lW?TWTOfe 



Tl~i3 



riv Ji- 



ni 7 37 Jll\ 3 * 



mliTiiniij] 



Hotiecotiput 

oftware 



Checksummer 



*\. 



2'S6 



Schneider w appkz 



ATARI 1 



sinclaii? 
Spectrupv,^ 






pe«" 



.v» 



H* 



tf*°. 



^a* 1 ' 



oS55,- sfr6,50 DM6,50 



h 



* 



<& 



«*» 



V 



J 



%#*- 



-%r r 





I &&«£ 2 £ 4 5 I ICH 

4 csgss i— iiiniiMiiiiii ' : | am 


p 


■ »imiHHHwi'r i ii > in mn hihihi ' iii '"'ilirt .";;: 


' JntwiiiiiTiiriiininiM'i n*»MwwiiBfptiipmnB— a— n raittrmppnKi pwiti- i ■ w juwinrii iiw w'i i i i na ii «< n ^< i um i rrr rrfmii 




■ fl 


urbo Ra 





LV / 






•^F^? 



; -" :: " :/ "'* 



Kung-Fu 



Das "Muß" für alle C 16*- User 

* undC116/plus4 

9m, 




Die Diskette & 
Kassette 
zum Heft 



juiviwurtrrt 



Aus dem Inhalt: 

PRINT 

so drucken Sie Transparente 

Little Printer 

Das tolle Malprogramm 
für alle 64k-Versionen 

Super Spiele 

z.B.: Megazone, Mad Mamba, 
Solitaire, Mad Maxe 

Utilities 

Menügenerator u.v.m. 
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Bestellungen an: 

Tronic-Verlag 

Stad35 

3440 Eschwege 

Tel.(05651)30011 

Lieferung innerhalb 
einer Woche! 




Kassette CSOK 2/2 35, - 
Diskette CSOD 2/2 35, - 



COMPUTRONIC- Aktion ! 



Der verflixte Punkt! 



Picken Sie sich Ihr Wunschprogramm aus dem 
riesigen Sortiment des Tronic-Verlags ! 

Seit unserer Ausgabe 5/86 haben wir eine neue Treue-Aktion - den „verflixten Punkt" 
COMPUTRONIC ruft Ihnen zu: „Finden Sie auch in dieser Ausgabe den „roten 
Punkt"! Denn: Wenn man ihn aufgespürt und herausgeschnitten hat, sollte man das 
„Ding" schleunigst in den untenstehenden Coupon einkleben. Hat man -nach zwei wei- 
teren Computronic-Ausgaben - drei Punkte zusammen, dann heißt es, schnell den fer- 
tigen Coupon ausschneiden, das gewünschte Programm, das einem „zusteht" (Kassette 
oder Diskette!), eintragen und das Ganze zusammen mit fünf Mark (Unkostenbeitrag 
für Porto + Versand) an den TRONIC-Verlag schicken! „Ihr Wunsch ist uns Befehl"! 
D. h., wir werden so schnell wie möglich das Programm Ihrer Wahl abschicken! Einige 
„Schlitzohren "sind so clever und entscheiden sich bei Ihrer Wahl des Datenträgers für 
die neusten Disketten /Kassetten, obwohl diese manchmal noch gar nicht existieren. 
Aus diesem Grund haben wir die Programme, die bis zur nächsten Ausgabe aus der 
Wahlmöglichkeit fallen, mit einem Sternchen gekennzeichnet. Viel Spaß beim Suchen, 
Finden und Gewinnen! (TB.) 




Ausschneiden und auf eine Postkarte 
kleben, abschicken an; 

Tronic-Verlag 
Postfach 870 
3440 Eschwege 

Computronlc 



Ja, ich möchte eine Programmdiskette /Kassette nach Wahl/ 
Aus Ihrem Sofware-Service habe ich mir folgendes Angebot ausge- 
sucht: 

Bestell-Nr. Mein Computer. 

Diskette D Kassette Q 

5 DM für Versandkosten liegen O als Verrechnungsscheck 

O bar bei! 
Hier sind meine „verflixten Punkte"; 




Name: 




Kurz belichtet 





C-64 



TURBO RACER 

Die Motoren heulen auf, die Ampel zeigt 
noch Rot. Jetzt springt sie um auf Grün, 
und ab geht die Post. Nelson Piquet hat 
wieder einen Super-Start gehabt. Frank 
Brall rollt wie immer das Feld von hinten 
auf Nach und nach kämpft er sich an 
Nelson Piquet ran. Fünf Runden vor 
Schluß: die Entscheidung. Piquet schei- 
det mit Motorschaden aus, und Frankie 
Boy fährt seinem ersten Grand-Prix- Sieg 
entgegen. 

Dieses Spiel läßt die Herzen der Pisten- 
flitzer höher schlagen! 








Seite 8 



DIE BIENE MAJA 

Die kleine TV-Summse will jetzt auch die 
Herzen der Computer-Freaks erobern. 
Fleißig, wie ihre Ameisen- Freunde, ackert 
Maja den ganzen Tag. Für ihren Freund 
Willi ist ihr halt nichts zu viel. Kein Weg ist 
für die kleine Biene zu weit, wenn sie dem 
verfressenen Willi den Nektar besorgt. 
Trotzdem erwartet Sie bei diesem süßen 
Spiel kein Honigschlecken! 




Seite 15 



VC- 20 



TITAN 

Bereiten Sie sich auf eine lange Reise vor. 
Die NASA hat diesmal einen etwas außer- 



gewöhnlichen Auftrag für Sie. Der Saturn 
ist als Ziel auserwählt, wo Sie fremden 
Chaoten das Handwerk legen sollen. Also, 
geben Sie Ihr Bestes, damit die Bösewichte 
ihr Vorhaben nicht in die Tat umsetzen 
können. 

Seite 19 



C-16 



MEMORY 
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An dem Gesellschaftsspiel haben jung und 
alt schon seit Ewigkeiten ihre Freude. Jetzt 
können Sie Ihr Erinnerungsvermögen auch 
am Computer-Bildschirm testen. Decken 
Sie also fleißig Karten auf, denn da kommt 
echt Freude auf! 

Seite 22 



QUADRATO 



„So einfach gemacht, aber unheimlich gut!" 
Das war das allgemeine Urteil über dieses 
Spiel. Der Dauerrenner in der Redaktion 



IE 



r T~i 



ts^ 



»IBÜSSfDftK : 316* 



VUUK SCRRE: I 



'" 1* 1 '.'{5 Ji i i; 1 .':;" 

pic-iüftE; 1 I: IHM''- ' l*Ä?i-'8 



erfordert vor allem blitzschnelle Reaktio- 
nen. Ein vorgegebenes Bild müssen Sie in 
einem größeren Feld wiederfinden. Dabei 
werden Sie sicher nicht nur einmal wie der 
„Ochs vorm Berge" stehen! 

Seite 28 



SPECTRUM 




\P 



OSWALD 

Waidmanns Heil! Die Nahrungsmittel 
sind bei Oswald zur Neige gegangen. 




Ä 



£ : I £ 

Folglich schickt ihn seine hungrige Fami- 
lie wieder auf die Jagd, damit die leeren 
Bäuchlein etwas zu tun bekommen. Da so 
eine Jagd anstrengend ist, braucht Ossi 
natürlich Wegzehrung. Die Hasen, die 
Ossi auf seiner Jagd erlegt, werden wohl 
hoffentlich die rumorenden Bäuche stil- 

Seite 32 




Nasi- Goreng, der große Meister im 
Kung-Fu, muß sich der härtesten Bewäh- 
rung stellen. Mit gezielten Schlägen und 
Tritten gilt es, Messer und Stöcke abzu- 
wehren. Dazu ist wirklich ein genaues 
Auge und blitzschnelle Reaktionen erfor- 
derlich. Nur mit der Ruhe, mit der ein 
Meister an die gestellte Aufgabe geht, 
können Sie diese hohe Anforderung an 

erfüllen. „". „_ 

Seite 35 




ATARI 



INTQ DEEP 

Ein absoluter Knüller für den kleinen 
Computronic 




Kurz belichtet 



Atari. Kämpfen Sie sich durch die ge- 
heimnisvollen Gänge, und erledigen Sie 
alle, die sich Ihnen in den Weg stellen. 
Mit einem Laser in Augenhöhe können 
Sie feindliche Objekte vernichten. Sollte 
es einmal nicht weitergehen, weil Sie vor 
einer Wand stehen, dann legen Sie ein- 
fach eine Bombe. Natürlich müssen Sie 
bei der Sprengung etwas Abstand halten. 
Viel Spaß! 




DIE BIENE MAJA 



Die Premiere mderComputronic! Das gab 
es bisher noch nie in dieser Zeitschrift. Ein 
und dasselbe Programm für zwei verschie- 
dene Systeme in einer Ausgabe. Die Ge- 
brüder Reitz machten es möglich. Damit 
dürfen auch die Atari-Freaks mit der klei- 
nen Biene Maja auf Nahrungsbeschaffung 
gehen, um den faulen Willi mit Nektar zu 
versorgen. 
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OUADRATO 



„Die spinnen, die Römer!" Der legendäre 
Ausspruch der Comic-Figur Obelix hat 




schon irgendwo seine Berechtigung. Ein 
Spiel für zwei Systeme in einer Ausgabe, 
das reizte sogar unseren Programmierer 
Frank Brall. Somit entstand neben dieser 
Atari-Version die C-16-Version. Warum sol- 
len so gute Spiele denn auch nur für die 
Atari-User bestimmt sein? 

Seite 60 



Reversi 



Schon lange bekannt, weckt dieses Strate- 
giespiel immer wieder neue Begeisterungs- 
stürme. Jetzt können sich die (kleinen) 
Atari-Freaks mit dem Computer messen. 
Wer nach langen Tramingsstunden die Son- 
derklasse erreicht hat, kann dann den Fa- 
milienmitgliedern eine echte Lehrstunde 
erteilen. Zeigen Sie klar auf, wer der beste 
Stratege in Ihren Kreisen ist! 




Seite 64 



TI-99 



JUMPING MINER 

Hüpfen kann jeder, aber gezielt hüpfen ist 
schon mit Schwierigkeiten verbunden. Das 
müssen Sie nämlich bei diesem Spiel prak- 
tizieren. Ihre kleine Spielfigur soll Erdhü- 
gelchen und Lampen in einer Grube durch 
einen gezielten Sprung erreichen. Beeilen 
Sie sich, denn die Zeit drängt! 




Seite 68 



APPLE 



ENEMY-ATTACK 

Ihre Bodenstation wird von Fallschirm- 
springern bedroht. Setzen Sie Ihre Boden- 
kanone dazu ein, um die kleinen Flatter- 
männer daran zu hindern, den Boden zu er- 




reichen. Natürlich müssen Sie versuchen, 
schon die Hubschrauber zu treffen, zumal 
es auch leichtere Ziele sind. Halten Sie sich 
also den Gegner vom Hals. 

Seite 71 




Vorwort 

leiner Hinweis für unsere Program- 
mierer^ Freunde: Ihr könnt der Versandäbr 
i 'eilung viel Arbeit und Zeit ersparen, wenn 
Ihr Euren Einsendungen einen Freium- 
schlag, mir 1,40 DM versehen, heißigt: Die 
Versandabteilung hofft auf Eure Zusam- 
menarbeit und dankt Euch schon im Vor- 
raum 

Thomas Brandt 
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Speedy 1050. 

Der Daten-Wirbelwind! 

Wer einige Zeit auf einem Atari XL mit der Datasette gearbeitet hat, der wird so manc^^^ 

Hatmansicfcdai^^^ 

schwindigkeiten der modernen Floppys, ist die 1050 doch recht langsam. 



Die Firma COMPY-SHOP hat diesem 
Übel nun mit der Einführung der SPEEDY 
1050 Hardware-Erweiterung ein Ende ge- 
macht. Bei der Speedy 1050 handelt es sich 
um eine Platine, die direkt in das Laufwerk 
eingebaut wird und die Arbeitsgeschwin- 
digkeit um ein vielfaches erhöht. 
Erhältlich sind drei verschiedene Versio- 
nen, die im Prinzip dasselbe leisten, sich 
aber in kleinen Details unterscheiden. So 
ist beispielweise bei der T- und derTE-Ver- 
sion eine Trackanzeige vorhanden, die je- 
derzeit über die aktuelle Stellung des 
Schreib- Lesekopfes Auskunft gibt, eine 
Einrichtung, die vor allen Dingen die Dis- 
kettenprofis zu schätzen wissen dürften. 
Der Preis für die Geräte liegt zwischen 
198,- und 29 8,-DM, und ist somit recht gün- 



stig. Im Preis nicht enthalten ist ein umfan- 
greiches Handbuch, das alle Funktionen 
genaustem erklärt und für das zusätzlich 
50,-DM berappt werden muß. Allerdings 
erhält man mit dem Erwerb des Buches 
auch die Lizensrechte, die es ermöglichen, 
selbst Software für die Speedy zu entwik- 
keln und diese frei zu verkaufen. Im Liefer- 
umfang enthalten ist ein 22seitiges Hand- 
buch, in dem der Einbau und die Handha- 
bung des Geräts kurz erläutert werden. 
Der Einbau gestaltet sich für jemanden, der 
ein wenig Ahnung von Elektronik hat, 
recht problemlos. Ansonsten besteht na- 
türlich auch die Möglichkeit, die Erweite- 
rung beim Compy-Shop einbauen zu las- 
sen. Zunächst muß das Laufwerk komplett 
zerlegt werden. Danach müssen ROM und 



CPU aus ihren Sockeln entfernt werdei 
Auf diese Weise entsteht ein Steckplatz, dt 
nun die Anschlüsse der Erweiterung au 
nimmt. Bei einer Speedy 1050 N oder 105 
NE ist damit der Einbau schon beende 
Das Laufwerk kann wieder zusammeng 
setzt werden. Bei den Versionen mit Tra 
kanzeige muß noch ein Loch in die Fror 
platte geschnitten werden. Dieses nimrj 
dann die Anzeige auf. Zusätzlich könn« 
noch zwei Schalter eingebaut werden, f 
die auch eine Anleitung beiliegt. Die 
Schalter müssen nicht unbedingt eingeba 
werden, sind aber dennoch sinnvoll. Seh; 
ter 1 ermöglicht es, Disketten auch auf d 
Rückseite zu beschreiben, ohne diese ei 
Lochen zu müssen. Schalter 2 ermöglic 
eine hardwaremäßige Umschaltung in di 

Computroni 



Insider Insider Insider Insider Insider Insider Insider Insider Insider Insider Insider Insider Insider Insider Insid 
er Insider Insider Insider Insider Insider Insider Insider Insider Insfctar Insider Insider Insider Insider Insider Ins 
ider Insider Insider Insider Insider Insider Insider InsiderJasÄter Ilwder Insider Insider Insider Insider Insider 
Insider Insider Insider Insider Insider Insider InsM^ >is k i S id' r h, 'der Insider Insider Insider Insider Insi 
der Insider Insider Insider Insider Insider Insi t i si :t \i l 1t ' Leider Insider Insider Insider Insider Insider In 
sider Insider Insider Insider Insider V, ider I & U ^i ',k j Insider Insider Insider Insider Insider Insider Insid 
er Insider Insider Insider Insider Insi J«|gic^r^!aer Insider Insider Insider Insider Insider Insider Insider Ins 
ider Insider Insider Insider Insider I^Rcferffisider Insider Insider Insider Insider Insider Insider Insider Insider In 
sider Insider Insider Insider Insider Insider Insider Insider Insider Insider Insider Insider Insider Insider Insider 



JÄ4UC 1? 

ISN ff) 




SLOW- Modus. Diese kann allerdings auch 
über die mitgelieferte Software erfolgen. 
Wer also nicht ganz sicher im Umgang mit 
dem Lötkolben ist, der kann getrost auf die- 
se Schalter verzichten. Nach dem erfolgrei- 
chen Einbau folgt nun im Buch ein Kapit- 
tel, das sich dem Test des Laufwerks wid- 
met. Hat man auch diesen überstanden, 
dann hat man es geschafft: Die 1050 Flop- 
py- Station ist nun um ein Vielfaches 
schneller. Das kann man sofort hören, 
wenn man beim Einschalten die System- 
Diskette bootet. Die Ladegeräusche und 
das Ladetempo haben sich verändert. Es ist 
allerdings nicht möglich, eine genaue Aus- 
sage darüber zu machen, um wieviel 
schneller die Floppy nun arbeitet. Das 
hängt zum größten Teil davon ab, in wel- 
chem Format die Disk bespielt wurde. Auf 
der System-Disk sind nun eine Reihe von 
nützlichen Programmen enthalten. So sind 
beispielsweise zwei Diskettenkopierpro- 
gramme vorhanden. HS- COPY: das ist ein 
Sektorkopierer, der den vollen Geschwin- 
digkeitsvorteil nutzt und mit den meisten 

Computronic 



Speichererweiterungen zusammen arbei- 
tet. 

Das zweite Programm ist für die Erstellung 
von Sicherheitskopien gekaufter Disketten 
zuständig. Nach Angaben des Herstellers 
soll es damit möglich sein, ca. 50 Prozent 
aller Disketten zu kopieren. Wir können 
diese Angabe nur bestätigen, denn bei un- 
serem Test gab es kaum eine Disk die sich 
nicht kopieren ließ. Ein Programm auf der 
Disk ist besonders interessant. Das ist ein 
Menue, mit dem man die Disk- Parameter 
direkt verändern kann. Es ist z.B. möglich, 
den automatischen Verify beim Formatie- 
ren oder Datenschreiben auszuschalten. 
Auf diese Weise wird eine Disk in ca. 9 Se- 
kunden formatiert. Weiterhin ist es mög- 
lich, die Speedy 1050,aus, oder in den Slow- 
Mode zu schalten. Dies kann notwendig 
sein, um geschützte Software zu laden. Da- 
zu ist allerdings zu sagen, ist diese Einstel- 
lung erst einmal vorgenommen, gibt es kei- 
ne Möglichkeit mehr, diesen Vorgang wie- 
der rückgängig zu machen, außer durch 
Aus- und wieder Einschalten des Lauf- 



werks. Dies stellt aber meiner Meinung 
nach keinen Nachteil dar, denn, ist die Soft- 
ware erst einmal geladen, will man norma- 
lerweise auch damit arbeiten. 
Es würde den Rahmen dieses Artikels 
sprengen, sämtliche Funktionen und Vor- 
teile, die das Speedy 1050 System bietet, 
aufzuzählen. Nur noch soviel: Speedy 1050 
unterstützt alle vorhandenen DOS-Versio- 
nen. Auch DOS XL von OSS, das meines 
Erachtens das beste DOS für den Atari ist. 
Zusätzlich werden alle Speichererweite- 
rungen vom Compy-Shop angesprochen, 
erkannt und verwendet. Nachteile, wie sie 
bei den meisten Floppyspeedern für ande- 
re Computer auftreten, wie Inkompatibili- 
tät mit manchen Programmen, traten wäh- 
rend unseres Tests nicht auf, so daß dieses 
System uneingeschränkt empfohlen wer- 
den kanrf. 

Zu beziehen ist das Ganze bei: 
Compy- Shop, Gneisenaustr. 29, 4330 Mül- 
heim/Ruhr, Dort erhalten sie auch nähere 
Auskünfte. Ottfried Schmidt 
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Lancia war auch da 

Mit Gummi auf der Piste in dieHigk-Score-Liste 




Turbo Racer 



1 





Österreich läßt grüßen! Steigen Sie in Ihren 
FormeM-Schütten ein, und schlüpfen Sie 
Für ein paar Minuten in die Haut von Niki 
Lauda. Bei diesem Programm von Ronald 
Mayer lernen Sie wirklich alle Tücken eines 
Grand-Prix-Rennens kennen. 
Ziel des Spiels ist es, mit einem Rennwa- 
gen auf einer von vier verschiedenen Renn- 
strecken die beste Zeit zu fahren. 
Dabei können folgende Schwierigkeiten 
auftreten: 

1) Treibstoff 

Sie haben nur einen bestimmten Vorrat an 
Treibstoff. Haben Sie diesen verbraucht, so 
ist das Rennen für Sie zu Ende. 
Der Treibstoffverbrauch richtet sich nach 
der Drehzahl und NICHT nach der Ge- 
schwindigkeit, 

2) Temperatur 

Lassen Sie Ihren Motor nicht durch zu ho- 
he Drehzahlen zu heiß laufen. Die Tempe- 
ratur erhöht sich, wenn sich der Drehzahl- 
messer im roten Bereich befindet. Sie senkt 
sich wieder im unteren Drittel der Anzeige. 
Ist die Temperaturanzeige ganz rechts im 
roten Bereich, dann haben Sie Ihren Motor 
zerstört, und das Spiel ist aus. 

3) Reifen 

Ihre Reifen nutzen sich ab, wenn Sie über 
die Kerben der Randstreifen fahren. Sollte 
die Profil anzeige ganz nach links gewan- 
dert sein, haben Sie einen Platten und müs- 
sen das Rennen vorzeitig beenden. 



Die Mindestzeit, die es zu erreichen gilt, 
beträgt 90:00 Zeiteinheiten. Die Uhr bleibt 
bei dieser Zeit stehen. Versuchen Sie aiso 
unter 90:00 zu bleiben, damit Sie in die 
Wertung kommen. 

Es sind fünf Runden zu drehen. Die Anzei- 
ge „LAPS TO GO" zeigt an, wieviele Run- 
den noch zu fahren sind. Die Ziellinie wird 
links und rechts durch eine Tafel mit der 
Aufschrift „S" (Start) dargestellt. 

Die Bedienung (Joystick 2): 
Lenken: 

Joystick links/rechts 
Beschleunigen: 

Joystick nach vorne 
Bremsen: 

Joystick nach hinten 

Hinaufschalten : 

Joystick nach hinten und Feuerknopf drük- 

ken 

Herunterschalten: 

Joystick nach vorne und Feuerknopf drük- 

ken 

Beim Schalten ist zu beachten, daß die 

Drehzahl hoch genug ist, damit der Motor 

nicht abstirbt (knapp im roten Bereich). 

Hinweise zum Abtippen: 

1) Alle Programmteite abtippen und spei- 
chern (also: Turbo Racer, Turbo/Track- 
parts, Turbo/ Sprites, Turbo/ Char und Tur- 
bo/Codes). 




2) Turbo/Trackparts laden und starten. Die 
Streckenteile werden erzeugt. 

3) Turbo/ Sprites laden und starten. Die 
Sprites werden erzeugt. 

4) Turbo/Char laden und starten. Der neue 
Zeichensatz wird erzeugt. 

5) Turbo/Codes laden. Bevor Sie diese; 
Programm starten, vergewissern Sie sich 
daß auf der eingelegten Disk noch minde 
stens 45 Blöcke frei sind. Nun können Sit 
das Programm starten. Nachdem die Tabe] 
len und Codes vom Programm erzeug 
wurden, werden sie automatisch zusam 
men mit den Sprites, Zeichen usw. unte 
dem File „TURBO" auf Diskette geschrie 
ben. 

6) Wurden die Punkte 1-5 fehlerlos ausge 
führt, dann steht nun das fertige Prc 
gramm, bestehend aus den Files „TURBt 
RACER" (Hauptprogramm) und „TUE 
BO"(Codes, Sprites usw.) auf Ihrer Disk. E 
werden nur mehr diese beiden Files benc 
tigt. 

7) Nun laden Sie das Programm „TURB( 
RACER" und starten es wie gewohnt mi 
„RUN". Das Programm lädt nun selbstäi 
dig das File „TURBO" nach. Es erscheir 
das Titelbild, und dann geht's los. 

Es sieht am Anfang schwerer aus, als es is 
Übung macht den Meister! 
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C-64 LISTING + CHECKSUMMEN (C V1.0> 

1000 REMtt###*#»»*##»»»##»*tt#####*»*»»» 

1001 REM« TURBO RACER MAIN # 

1002 REM» * 

1003 REM» COPYRIGHT 19B6 BY MR-SOFT « 

1 004 REM» * 

1005 REM» RONALD MAYER » 

1006 REM» THENING 24 « 

1007 REM» A-4062 THENING/AUGTRIA » 
lOOS R£M*#*######tt#**######*tt#*######» 

1 009 X=PEEK ( 1 86 ) i I FA=OTHENA= 1 1 P0KE53265 , O i LOAD " T 
URB0",X,1 

1 1 PÜKE56 , 64 = CLR i PGKE64B , 64 i P0KE5&576 , 2 : P0KE53 
272, IS: PRINT* {CLEAR Q TRLH} " 

1 1 1 V=53248 J 5=54 272 1 P= 1 7400 1 M=33536 

1012 FORI=OTO3iHl*<I)="R0NALD<:Sf^Cf5J90iO0 ,, iNEXT 

1013 LI*="CC SP>1CC36 >]" 

1014 L2*= "-=) ) );) ) )■) ) )f) ) ){> ) >[) ) )|) ) >:) ) )[ 
))>>■ *»* 

1015 L3*="*C< (<((((((((<((((((<(((<(('((( t(C((( (( 
<," 

1016 L4»="EC SP4CE<S 3: <<(<; < ( <((( ( <(<(<<(<,(({< {SP 
ACE 6 1 3 " 

1017 L5»=" E C SPACE6 3 3 { GREEN SPACE3 ORANGE } ZI { SPAC 
E14 }Z1{ GREEN SPACE 3 ORANGE } E { SPACE6 } 1 " 

101B L6*=" [ { SPACE6 } / )))+/)))>)) )>>)))))+/>)) + {SP 

4CE6 > 3 " 

1019 L7*=" ;<(((((((( t ( t (( C (( t< ;{((<(((((<(((((( < 

(<" 

1020 

))+" 

1021 L9*= " { ORANGE } 3 { SPACE BLACK} 

-^ ORANGE SPACE> E3 C SPACE BLACK} {O 

RANGE SPACE ! E " 

1022 C*="fg£D>'-Ct££I GREEN } " 

1023 F0RI=0TD3:READTR(I> , TL < I ) ,THCI):NEXT 

1024 DATA1 14, 225.12B, 118, 83, 129, 134, 201,129,152, 
79,130 

1025 BÜTQ1051 

1 026 REM#tt##*#»#»#*#**####»»####tt»*### 

1027 REM#TITLE # 
1 02B REM*»#»#»#»»»tt######«#»########*# 

1029 P0KEV+17,0:P0KEV+21,0sPGKEV+22,216 

1030 POKE V+32 , 1 5 : POKE V+33 ,15: PDKEV+34 , 1 2 i P0KEV+3 
5,1 

1031 PRINT" {CLEAR ORANGE } "L2*L1*L1 * ? 

1032 PFlNT"t<. SPACE2 } f (((((< t (< f <<; t < ( i< { SPACE } f ( 
( ( (< {SPACE} ( ( ( ( < < {SPACE3} 1 " J 

1033 PRINT" E { SPACE? }/) >{SPACE}=) + 3 I SP4C£ > E 3 {SPAC 
E} E 1 {SPAC£}^> {SPACE} C { SPACE } 3 { SPACE} -> {SPACE} Z ES 
FACE} 1 { SP ACE } = > { SP ACE } E { SPACES } 3 " ; 

1034 PRINT" E {SPACE4} 3 { SPACE } E { SPACE2 } 3 { SPACE } E 3 { 
§£ACE} L3 {SPACE^}* , {SPACX} *<1 {SPACE}* , {§PjACE}*<-l{S 
PACE} E 1 { SPACE } E { SPACE3 } 3 " ; 

1035 PRlm"L{SMCE4}l{SPAC£}Z{SJPACE£}l{S£ACE>Lll 
S^9Cf> C 3 ( SPACE} = ) > E SPACE} E 1 { SPACE} = > > { SPACE} E 1 { S 
PACE} 1 1 { SPACE } E { SPACE3 } 3 " i 

1036 PRINT" E f SP4CE* > 3 E SF/JCE } E { SPACE2 } 3 t SPdCf } « . I 
SPACE } E 3 { SPACE } C { 5P/1CC I 3 fSP4CEJ E 3 {SPACE.}* I , < SP4C 
L} ^} CSPACE}*, CSPACE} Z{SPACEJ_}}"', 

1037 PRINT" E< SP/1CE4 >/)+{ SP4Cg2 >/) ) ) > + /) +{ SPACE }/ 
>+/>>>)>+/>)> )+{SPACE3}J"LX*i 

1038 PRINT •'L{ SPACE3 }t <(<« { SPACE } t ( ( < « , ( ( ( (< t ( ( 
( (<j ( < ( <<tS£4CE£J3"| 

1039 PRINT" E EgP/jCEJJ 1 {SPACE} = >{ SPACE } E E SP4CO 3 CS 
££CE3 = MS£4^3C3ESPi5C£:> = > >+3ESPdCE}=> >+3{SP*C£>- 
> {SPACE} C {SMCH J 3 " ; 

1040 PFtim"l{SPACEA>ltS£AC£}*,{SPACE}*<l{ SPACE }* 
, { SPACE } E 3 E SP,4Cf > E {SPACE3} 3 (SP4CEJ » (< {SPACE} D {SP 
4C£> * , { SPACE} * < { SPACE3} 1 " } 

1041 PRIHT'Z { SPACE 3 }} { SPACE }^) >{ SPACE } C3 {SPACE}= 
>{SPAC£} E 3 tSPjjC£> C {SPACE3} 1 {SPACE}*) +{ SPACE } 3 {SP 
ACE }=) > { SPACE } E { SPACE3 } 1 " ; 

1042 PRINT" E C SP^CCJ J 3 {SPACE} E { SP4CE 3 ] t SP4CE >E 3 CS 
£3C£J E 3 f SPACE} E 3 {SP^flCEJ # ( < < 3 {SPACE} *■ ( ( < 3 {SPACE} C 
{ SPACE } 3 { SP ACE } E ESP4CEJJ 3 " j 

1043 PR INT " C t SP<4CC3 > / ) + { SPACE }/ )+/)+/) +/) ) ) >+/) > 
>)+/) +tSP4CEJ /) +{SPAC£3} 3 "Ll*Ll*i 

1044 FRINT"CESP^C£2>; (<(<<<<<((((<<(<<<<((((<<<< 
t ((K<t SJ a /lCE2 3 3": 



<39> 

<151> 

<53> 

<133> 

<55> 

<153> 

<209> 

<4> 

<47> 

<220> 

<236> 
<77> 
<125> 
<59> 

<40> 

<19B> 

<175> 

<9> 

<207> 

<234> 

<93> 



<144> 

<B7> 

<24B> 

<113> 

<73> 

<66> 

<99> 

<68> 

<198> 

<129> 
<49> 

<9> 



<200> 

<95> 

<97> 

<8> 

<73> 

<237> 

<255> 

<4> . 

<9> 

<246> 
<143> 
<104> 



1045 PRINT" E { SPACE2 } 1 {BLACK}S{ SPACE }COPYRlGHT{SP 
ACE} 1 9B6 { SPACE} BY {§P4C£>RGNALD {SPACE} MAYER { ORANG 
E>E { SPACE? } 3"i 

1046 PRINT" E { SPACE2 } /)>>)))>))>))))))) >))))>>>)) 
) > ) ) )+ESP4C£23 3"Ll*Ll*; 

1047 PRINTL3*) 
104B POKE V+ 17, 27 

1049 IFPEEK (56320) -127THEN1049 

1050 RETURN 

1051 REM#»#»«*#**##*M»»«»****»*«**###* 

1052 REMttMENU * 

1053 REM»*#»#»##»#*#»#####»»###»#»##»» 

1054 SYSM+3;G0SUB1026 

1055 P0KEV+17.Qi PRINT" { CLEAR ORANGE } "L2«Ll$Ll«i 

1056 PRINT" t { SPACES : (((<((«; f (( «i KHK {SPACE} 
; t<; <<{SPACE5}l"i 

1057 PRINJ"1{S±ACE^}}{S±ACE}^>{SPACJEJ} = >{SPAC£}13 
{§££££} = ) ) +3 { SPACE }~> { SPACE } *< 3 { SPACE } E 3 { SPACE } C 
t SP/ICE5 > 3 " ; 

1058 PRINT" E t SP^C£5 ? 3 t SP/ICC T E 3 { SPACE } E 3 C SP4CO C 3 
<SP4CE>* << tSP>1CC> 3 < SP>1CE 3 [/ > {SPACE} 1 1 {SPACE} E 3 tS 
P4CE 3 E { SPACES. } 3 " ; 

1059 PRINT" E I SP>1CE5 > 3 { SPACE } E / ) +3 { SPACE } C 3 < SP/ICE 
} = ) + {SPACE} 1 { SPACE } E { SPACE } 3 <SP£C£> t 3 { SPACE } E 3 tS 
P^CE 3Et SP/ICC5 >3"; 

1060 PRINT" E { SPACES } 3 I SP»CE > E { SPACE3 } 3 t SP>tCE 3 E 3 { 
SP£C£>* ( (< 3 ESP4CE J E {SPACE} 3 CSPflCEJ E 3 {SPACE}*, {SP 
ACE_} l {SPACES} 1 " i 

1061 PRINT " E { SPACES } / )+{ SPACE3 } /)+/) ) ) > +/) + { SPAC 
E}/)+/) >))+{ SPACE5 }V , s 

1062 PRINTL1*L1*L1*L4*L5*L6*L4*L5*L6*L4*L5*L6*L1 
*L1*L3*; 

1063 PRINT" { BLACK UP11 RIGHT 1 ? > START t SP/lCC lRACE" 

1064 PRINTTAB ( 16) " { D0NN2 } TRACK: "TR+1 

1065 PRINTTAB* 15> " WONN } BEST t SP^CE > t IMES " 

1066 P0KEV+I7,27eX=OiY=OiJ»OiGQTO1O7I 

1067 J=PEEK<56320) s IFJ= 127THEN1067 

1068 IFJ=126THENY=Xi X=X-120i IFX<0THENX»240 

1069 IFJ=125THENY=X: X=X+12Ö: IFX>240THENX=0 

1070 PGKE16913+Y,32:PaKEI6934+Y,32 * 

1071 PDKE16913+X,30:POKE16934+X T 31 

1072 IFJ=111ANDX>=OOOTHEN1127 

1073 IFJ=lllANDX=120THENGaSUB1093*GDT01055 

1074 IFJ=lllANDX=240THENG0SUB1077tG0TD1055 

1075 WAIT56320,2,0:WAIT56320,l,0 

1076 B0T01067 

1077 REM»»*tt»«»t»»«»**tt»»#»tt»»»»#»#»#tt 
107B REM*BEST TIMES • 

1079 REf1»»#»#»»###»###»#»#»»«»#»#*»»## 

1080 PRINT" { CLEAR ORANGE } "L2<; :P0KEV+17.0 

10B1 PRINT" EE SP4Cf >: <(<j ((<( U< { SPACE* } t (<<)<(<< 
■((<;((<;( (< { SPACE } 3"; 

10S2 PRINT"C{SP4C£>/>= + 3 = >E3->E<:SP4C£l>/>- + 3E3»> 
=>C3=>+3°)+ { SPACE } 3 " i 

10B3 PRINT" Z{ SPACE2 } ]C { SPACE } 3E3E3#,Ei ( («3E {SPA 
CE} 3E3C3E3C3*<E SPACE } 3 * ( < { SPACE } 3 " j 
10B4 PRINT" E C SPACE2 } 3 E t £P4CE J ] E 3 E 3-) +/ > ) ) * JE tSP/t 
CQ3C3E3E3E 3=+ { SPACE } / ) >C { SPACE } 3 " i 
1 OS5 PRINT" E C SP4CE2 3 3 E CSP4CEJ 3* , E 3 E { SPACE /} 3 E <SP 
4££.J 3 E 3 C 3 E 3 E 3» (< ; < , E CSP4CEJ 3 " ) 

1086 PR I NT " E C SP4CE2 > /+ { SPACE } / ) > +/+{ SPACE7 > /* {SP 
ACE} / + /+/+/+/) )+/) )■>■ { SPACE } 3"L3* 

10G7 PR INTL7SL9« " 3 { SPACE BLUE }TRACK{ SPACE } 1 { SPAC 
E10 ORANGE } ZI { SPACE BLUE SPACE? }7mCK{ SPACE }2.{SP 
ACE ORANGE } E"L9*j 

10B8 PRINT" 3 { SPACE GREEN } "HI» C0> " C SPACE ORANGE } C 
3 { SPACE GREEN } "HI» ( 1 ) " { ORANGE SPACE > E "L9*L 8* > 
10B9 PRINTL7*L9*"]{SP£CE BtüE>TRACK<SP4C£>3{SP4C 
£iS Qff/lWgE JE 3 { SPACE BLUE SPACE9 }JRfKCK{ SPACE }A{SP 
ACE ORANGE } E"L9»t 

1090 PRINT" 3 f SP/ICE GffEEW > "HI< t2> " C SPACE ORANGE } E 
3{SP4C£ GREEN } "HI* <3) " { ORANGE SPACE > E "L9»L8»f 

1091 POKEV+17,27 

1092 WAIT56320, 16, 16: HAI T56320, 16,0: RETURN 

1093 REM»»»##»##»»#»###*»#»#«#*##»»##» 

1094 REM»PRACTICE » 

1095 REM*#*######*#*#»##»»##»#»*###»#» 

1 096 PGKEV+ 1 7 , i POKE V+32 , 1 5 l POKEV+33 , 1 5l POKEV+34 
,12rP0KEV+35,l 

1097 PRINT" { CLEAR ORANGE } "L7*i 

1098 PRINT"]{ Bf.t/C SPACE4 SG SJ_ S* SN SP SPACE-* £ 
£ 5i 5* Sff SP4CE ORANGE } E 3 { BLUE SPACE2 SL S*3 SN 

S£_ SPACE SG SL S*± SN. SPACE2 ORANGE } C " j 

1099 PRINT" 3 { BttfE SP/1CE S^ S*2 SP SD SPACE SE_ SC 
SF SPACE3 SS SD SPACE SA SPACE ORANGE } ZI { BLUE g, 



<152> 

<234> 

<156> 

<B2> 

<I76> 

<172> 

<91> 

<105> 

<93> 

<73> 

<9> 

<50> 



<206> 

<85> 

<237> 

<9> 

<243> 

<I16> 

<255> 

<I03> 

<86> 

<206> 

<190> 

<127> 

<105> 

<218> 

<146> 

<18> 

<1B1> 

<252> 

<7B> 

<15B> 

<U7> 

<176> 

<119> 

<27> 

<237> 

<66> 

<21 1> 

<B2> 

<173> 

<166> 

<166> 
<6B> 

<46> 

<142> 

<125> 

<76> 

<133> 

<B0> 

<135> 

<163> 
<13> 

<169> 



Computronic 



a 




(W 



jöd^ 



6* 




P>ICE-2 SHS#SHSFSXS£S»SPSD SP/|CE ££ Si s» 
SO SP^CCJ OMWG£}["| 

ItOO PRINT" IKBtÜE SPACE SA SPACEi SE. ££ SF SPACE. 
2 SA SPACE2 SA SPACE ORANGE ! l!(BJJJ£. SPACE2 SL_ Sft 
SE SR SPACE2 SL. SwJ SP SD SPACE4 ORANGE ! C " | 

1101 PKINT" K B LUE SPACE SA SPACE4 SL S* SM. S£ £0 
S*2 SO SP/ICE SM S4 SPACE 0RAäM*m8LUE. SPACE £ 

C SJ SHS» SO SPACE2 §H S*3 SV, S#J Srt ££/!££ 2M* 
GEIC"; 

1102 PRINT'aCBJJ/E SPACE SA SPACE4 SA S6_ Sj7 SP^CE. 
<S Sü ST SP>1CE QRAHGEJZKBtJ/M. SPACE £S SO §ß SJ. % 
M SPACE SG SL SM SF §X SU SPACE2 SG SJ SPACE. QR& 
HGE !L"j „ „„ 

1103 PRINT":tBtW£ SP/ICE SK SF SPACE3 SA SS §D_ SP 
>1C£7 S/1 SP4CE Ogd«e£>CKStü£ SPdCE M SS SB SD £ 
4 SPACE SS SD SE Sfl SPACE3 SG SS SD SPACE QßANGE 

1104 PRINT-ltfliüf SPACE S£ SO S*3 S£ S4 SP./ICE? S 
G SZ S* Stf SF SPACE SA SPACE ORANGE! C3 iBLUE SPAC 
g. M SS SD SP/1CE SiS£W SP/1CE2 S£ £F ££*££. §£ 
SB SD SPACE? ORANGE ) C " ) 

1105 PRINT"]{ gf-ür SP4CE7 SN S*2 SP SD SPACE SE $ 
Q S* SO SPACE g&AJiGJL!Ll(BLUE SPACE SM SO S.PACE2 
SM SP SD SPACE? SE So S* SP SD SPACES ORANGE! £") 
TTo6~PR INT" !KSP4CE9J-> >>)))>)+/))>>»))> >CSPACE9> 

C "• 

1107 PRINT"3tSP^CE SJ^C/f) TRACK t SP^CE> 1 CSPjJCE 0*4 
NGE! [ j <<(( C (<<(<<<<<(<< 3 tSP4C£ Bi4£K> TRACK (SPACE. 
!2( SPACE ORANGE. ! [ " } 

1108 PRINTVm)>)>>)+3tSP*C£ BJLflCK SPACE ! 5ELECT 
{SP^CO TRACK {OjMMGE SP/tCE2 >C /)))>>))> > + " I 

1109 PRINT"; (((((((((< 3 (-SPACE RED SPACJZ! I (SPACE 
2J2tSjPjflC£^>3{SPi!CE2>4tSP4CE2 ORANGE SPACE! 1 1 <((< 

(((((<") 

1110 PRINT" 3 tSPjflCE BLACK! TRACK tSP*Cf_> 3 f$£*CE GM 
Ng£>[/))))>)>) )))>>)>>+3{SPJCE BL*CK> TRACK {SP4C£ 
14( Oft/WGE SP4C£> C"i 

IUI PRINT"] ( SPACE9 !*l ( ( ( t C < (<| (<<((( 1 < , tSP^CCg.> 

1112 PRINT" ]{ BLt/£ SPACE4 SL, S* SH SF SP^CE4 SG §. 
/ SH SP/ICE OSMOSiC^S^OE SPACE SL SH SF S PACE2 
SC SI 5*6 Stf. SF SPACE2 ORANGE ! l"\ 

1113 PRINT" ]{ g£ÜF SP^CE St Sjf2 SO SPACE SE. SQ. S* 
Sff SPACES SG SB SD S4 SP^CE Oj?4NGE> C 3 tBtWf £P4C 

£ SA SE SC SF. SPACE SS SD SPACE3 SL Stf. S£ £E SÄ 
SPACE? ORANGE ! l"i 

1114 PRINT" KBtüE SP>lCg Sfl SPACE4 SL S*£ SO SPAC 
E2 SG SB SD SG SJ SP/ICE OMMG£> [ 3 tBM£ SPdCE SA 
SPACE SE SR SPACE SA SPACE4 SA SE SQ SM SA SPACE. 
2 ORANGE ! L"; 

1115 PRINT" !(BLUE_ SPACE SA SPACE4 SN S*3 SV S* S 
P SD SG SB SD SPACE ORANGE ! ZI IBLUE. SPACE SK S£. S 
L SO SPACE SA SPACE4 SA SPACE2 SA2 SPACE2 ORANGE. 

1116 FR INT" 3 I BLUE SPACE SK SF. SPACE3 SA S* SM. SX_ 
SU SPACE2 SG SB SD SPACE2 ORANGE! 1!<.BLUE_ SPACJE, 

SE SR SW SN SF SN S*4 SO SPACE S£ SJ M SPACE2 Q_ 
RANGE ! C": „ „^ 

1117 PRINT"] iSLM. SPACE SE SC SF SPACE2 SA SPACE 
SK SF. SPACES SS SD SPACES ORANGE! 1 1JLBLU& SPAC£2 
SK SF SE SQ S* SM SPACE SX SU. SPACE2 SS SR SA S 

PACE2 ORANGE ! C": 

1118 PRINT"3tB4yE SPACE2 S£ SC S£ SPdCE S£ SP^CE 
SE SR SPACE SCSISfl SPACE4 ORANGE! IHBLUE. S.PAC 

EZ SE_ SQ S*Z SH SN S#2 SV S«, SO SO, SJ_ &PACE2. QR 
ANGE ! L " i ^ , 

1117 PRINT'lCBttfE SP/ICE3 S£ Sä S* SO SP4CE? SH S 
* SP SO SP/ICE? OgyWej: 1 "^^^^ SPACE6 SN S»7 SP. S 
D SPACE2 ORANGE !l"L.ß*i 

1 1 20 PDKEV+ 1 7 , 27 1 TR=0 1 X =5579 1 1 Y»0 

1121 PDKEX+Y*3,2iPGKEX+TR*3,5l IFPEEK (56320) <> 127 

THEN1121 

1122 J-PEEK<56320>iTFJ=127THeN1122 

1123 1FJ*123THENV'-TRiTR=TR-1i IFTR<0THENTR-3 

1 1 24 I F J = U 9THENY=TR i TR=TR+ 1 1 I FTR >3THENTR-0 

1 125 IFJ«< 1 1 1THENWAIT36320, 16 ,0» RETURN 

1126 GQTOU21 

1 1 27 REM*######*#*###*####***##******* 
1129 REM#RACE * 

1 129 REM*########*#******#************ 

1130 F0KEV+17,0:GDSU8U49:G0SU8il41iSYSM 

1131 FaRI=B2STQlO00iPDKEI,0iNEXTiP0KEV+17,27 

1132 P0KE2S1,TR(TR):P0KE252,TL(TR)«P0KE253,TH(TR 

) 

1133 FORI=OT024sPaKES+I,OiNEXTiPaKES+6,240iPOKES 



io 



+24,31:P0KEB+4,65:PDKES+1,3 
<148> 1134 P0KES+22,130tP0KES+23,241iPaKES+2,200:PaKeS 

+3,160 

1135 POKES+13,242:P0KES+B,3 
<B2> 1136 FGRI=10TG13STEP3lF0RJ-lTD1000tNEXTJ 

1 137 FORJ-OT03I PDKE561 14+J, I i PGKE56154+J , I i NEXTJ 

,1 

1138 SY5M+6iFDKES+24,OjWAIT56320,16,16«WAIT56320 

<244> ,16,0 

1137 X=PEEK(a28>«ONXBOTQl 174, 1175, 1176, 1177 

1140 END 

U41 REM#»####1»###*Mm##*######**##*«#* 
<79> H42 REM#SET UP * 

1143 REM########»****##*»#************ 

1144 PGKEV-t-21,0:POKEV+33,12 

1 145 POKEV, 161 t PGKEV+1 ,230: POKEV+2, 185lP0KEV+3,2 
<148> 30 :PGKEP,14BsP0KEP+ 1,150 

1 146 POKEV+21 , 3i P0KEV+2S, 255 l PGKEV+39 , 6i POKEV+40 
6 : POKE V+37 , O i PGKEV+3B , 1 4 

1147 paKEV+41,7:PGKEV+42,7iP0KEV+16,0 
<76> ii 4Q RETURN 

1 149 REM*##»W»»##»**»*****»***#******* 

1150 REM#BAHE SCREEN * 
<50> u5i REM ##H############»#************* 

1 1 52 PGKE V+32 ,15iP0KEV+17,0 
<30> 1153 PRINT" ICLEAR 0fl>!«G£>"L7*" 3 iSPACE. BMCJC1TIME 

K. SPACE7 GÄEEH > 00 »00{SPJ££ ORANGE? I 3 ISPAC£ BLACK! 

LftPBt SP>TCE2 PE£>5tSPJCE2 BLACK!TOtSPAC£!BOlS£ja££_ 
< 1& *> GREEN!4<SPACE. ORANGE ! E"L8*j 

1154 PRINTL7*"3{SPi5CE H44CKJBEAR{SP4Cf3 GREEN! 1 < 
<1W> SPACE R^!2tSJPAQ£yXlS£ACE!4lSPACE>S<;SPACE, ORANGE 

! LI I SP ACE gj_jC5.> TEMP (. SPACE 2 L1G.GREEN! <tl 

G.REO ! ' ' ' (. SPACE ORANGE ! t "LB*i 
< 207> 1155 PRINTL7*" 3 iSPAC£_ BLACK!! IKESiSPACE Uß r REV! 

W**t f.JG.GfiEEH >««t»****t SP4CE ORANgE}* 3 <SPAC£ BJ^AC 

K!RPH<. SPACE3 LIG. GREEN ! (LlG^ßgD! ' ' ' t SPACE 

<7S> ORANGE ! t"LB*i 

1156 PRINTL7*"3{SP4££ BLACK !FUEL<.SPACEJ. LIG % RED! 
<14> ### c t. ig. GREEN ! »»«*»»« ( S£ACE ORANGE! I 3 iSPACE_ BLAQ. 

^BPEEDCSPjgCE LIG. GREEN ! (LIG. RED! ' ' ' LS£AC 

E ORANGE ! t"L-&* 
<21S> H57 PRINT 

1158 PRINT" {WHITE CA CZ. CE SPACES 7 CA QS SPACE.? 
CA CZ_ CP_ CZ_ CS. SPACES ! " ; 

1157 PRINT" OiHITE SPACES CA CE SPACE7 CA CZ2 C£ 
<26> SPACES CA CE SPACE10 CA CS!"', 

1160 PRINT" ( ORANGE SPACE9 CQ CD SPACE29!"; 

1161 PRINT" ( ORANGE SPACES SY_ CK SPACE CG C± SPAC 
£ CR CY QH CR QY CH SPACE6 CQ S\2 CO SPACEfi QQ Q. 

<207> D SPACE2 CQ CD!"i 

1162 PRINT" ( ORANGE SY SZ, ST SZ, C0 S± Sz£ CK CM £ 
1 SPACE. CG SV4 C£ SP/ICE C* CS SZ C± SPACE CM CN£ 

CiSIClC*MSiCiCJlCJ/ Si2 CN C!>"! 
<118> 1163 PRINT" ( RVSON LIG. GREEN SOJ7>DLM2CStS017:>"; 

1164 PRINT" ( RVSON LIG.GREEN SOlS i^KClRVSOFFi HßRE 
Y SS CF SG CF_ LIG.GREEN RVSON!HYQCS015!"l 

1165 PRINT" < «ySOW LIG.GREEN SQJ2!HIJC(S£&CE2 RVS. 
<205> OFF. HGREY CC CX CC_ CX LIG.GREEN RVSON S,P/1CE2>NVM 

X(SQj L 2!"% 

1166 PRINT" (RVSON LIG.GREEN §010! DFBC (SPACE 1 2 ! NT 

UBt SP-W l 
<234> n&7 PRINT" t ftySQH LIG.GREEN S0S>DEBC{SP^CEJ4.>NaR 

StS0S3"j 

1168~PRINT" (RVSON t IG. GREEN SÖ£}*ABCtSMC£20_>N0P 

QIS05 HOME RVSOFF ! " i 
<50> U69 P0KE173B3,2O7lP0KE56295,13 

1170 RETURN 

1171 REM#####*#*##**##****#*********** 
<199> U72 REM#6AME GVER * 
<214> H73 REM###*#it###*##*#**************** 

1 ! 74 T *m" » j FOR I=0T04 s T*«T*+CHR* (PEEK ( 1 6437+ 1 ) > i N 

<60> EXT:G0TQilB6 

<71> U75 A*="<RIGH7^>5aRRY-BUT<SP£C£>YOUCSP£££JAREt£ 

<33> P/ICE >0UTC 5P/ICE iaF{ SP4CC }FUEL!"tB0TQ117g 

<240> U76 A*»"{5JGHri>SaRRY-BUT{SP4C£>YOUtSP4e£JDAt1A0 

<56> EDt SP4CC >YQUR( SP4CE >TIRES!"tGQT0U78 

<165> 1177 A*-"(51GtfZ2.>SGRRY-BUT{£PigCi>Y0Ut£PjaC£lDE8TR 

<167> DYED<SPj4C£>YOURtSP4C£>ENBINE! " 

<29> 1178 PRINT"<RVS2FF HONE BONN 13 BLACK!" f iBOSUBl 1B 

<169> 2 

<36> U79 a*=»{ÄED flJGHTajPRESSCSe4C£JBUTTaNtSP4££>T0 

<217> ( SPACE ! RESTART i " l G05UB 1 1 B2 

1180 WAlT5632O,16,16iWAIT563Z0,16,0 

<233> UB1 GOTG1051 

1 1B2 REMff#«#*#*#######«*##************ 



<16> 

<93> 
<B4> 
<t79> 

<U4> 

<106> 

<169> 

<24S> 

<1B1> 

<70> 

<1B3> 

<253> 

<B> 

<12> 

<29> 

<14> 

<1B9> 

<166> 

<191> 

<63> 



<4> 



<53> 



<157> 



<217> 
<34> 

<234> 

<1B> 
<90> 



<175> 

<253> 
<214> 

<33> 

<2B> 

<73> 

<76> 

<124> 

<212> 

<36> 

<2U> 

<96> 

<213> 

<148> 

<!OB> 

<196> 

<25> 

<169> 

<213> 
<142> 
<229> 
<222> 



Computronlc 



Com 



modote 



&& 



11B3 REM«5TRINB PUTPUT # 

1 184 REM«*##«##«#***###tt#**#***####### 

1 185 FORI = ITOLEN < A*) s FORJ=lTOiOOs NEXTiPRINTMID* ( 
A*,I,i) ; jNEXT: PRINT i RETURN 

1 1B6 REM«#««««tt«##*«*#*####### #tt## it ### 

1187 REM#FINAL RESULTS # 

1 188 REM««#«***«tt«#*«««««#*##*tt#*#### tt 

1 189 POKEV+17 ,0: SYSM+3j POKEV+33, 15i PDKEV+34, 12i P 
DKEV+35, lsPOKEV+22,216 

1190 FQKEV+21 ,0; PRINT' t CLEAR ORANGE } "L2*i 

1191 PRINT " C t <{ SP4CE 8 3 j (<<;<( t K { SPACE ! i («j<{SP 
ACE9 i:<J"i — 

1192 PR1NT"E/+CSMC£8?3=) + 3C:=>*<3=>CKCSP^C£?J/ 
+ 3"5 

1193 PRINT" l H SPACEiO y 3*< iSPACEJ inr/>n».n rr<;t>A 
CEti y 3 ■' j 

1194 PRINT" C i SPACEtO i 3»+<:SP4Cg;> lfK f XPACrry 1 M = >t 
3 t C SF4Cgli 3 3 " ; 

1 195 PRINT" l t SPACElO i 3 C {. SPACE2 7 3 C 3 £ I SPACE y 3 1 3 C 1 1 
3»<<{ SP4Cey >3"; 

1196 PRINT" [{S££CFJ£}/+{S£4C££>/+/+<SP4C£}/+/+/+ 
/))+C SP/lC£y >]"i 

1197 PRINT" K. SPACE7 J; U« SPACE ?f (<<; ( (<)<;<) < <SP 
/[Cg3 ; ( (< {. SPACEY y 3 " ; 

H9B PRINT" C $ SPACE7 y 3 = >E {SP£C£3 3=) +3-) + 3 [ 3 [ 3 1 {SP 
4C£3/>=+{£P4Cg7}3"5 

1 199 PRINT" t { SPACE7 J 3*,*< J*< {S£4C£J 3* (< 3 C 2 1 1 L iSP 
4C££}3[{SP4C£S}3"! — 

1200 PRINT"E<SF^C£ZJ3") >C l=+tSPACE.y/} >[ 3 C 3 [ 3 KSP 
ACE2yiZtSPACE8yi" i ' — 

1201 PRINT"Ci<tSPd£gS>3CCSjMC£}3E3*«j {,C3*,C3»( 
< 3 [ I SPACE6 J i < 3 " $ 

1202 PRim"t/+£SPACE5J/+SSPACEJf+/) >+/))+/>)+/>) 
+ /+ 1 Sf_4C£i6 } / + 3 " L3*L7* ) 

1203 PRINT"3£fi££ S£ACO TOP-TIME {SP^C£>TRACK"TR+i 
" IQRAHGEy E K BLUE SPACElVOURtSPACEyTIi-lElQRANGE SP 
i 4C£S>C" i L9*j 

1204 PRINT" 3 {. GREEN SPACES "HI* (TR) " {SPACE ORANGE * 
C 3 {. GREEN S£4C£>7?????????<S£4C£;}'>T*''{SP4C£ QRANG 
£JE"LB*jL2*; ~ 

1205 PRINT "t C SP4Cf38 3 3"; 

1206 PRINT " E t SPACEia y 3 '■ r 

1207 PRINT" t C SPACE38 J 1 "L5ff ; 

120B POKEV+i7,27 E IFT*<RIGHT*(HI*<TR),5)THEN1212 

1209 PR INT »{UP4} "; ; A*=" { gl^CK ffISrtIS>SDRRY-THIS< 
SPACE* I S tSP/?Cg.} NO {SPACE* NEW tSPflC£> TOP-T I ME •" l BDS 
UB1182 

1210 A*=" {. RIGHTS ggP>PRE65tSg>jC£>BUTTUNt SP4CC }TQ 
<SPAC£>RESTART!" S G0SUBU82:WAIT56320,16,16 

1211 WAIT56320,16,O:G0T01051 

1212 PRINT" Cf/P£3";;A*«"C B£4C* fiietfTJCONGRATULATI 
ONS-YOU CSP4CO ARE {SPACE} A l SPACE} GREAT {SPACEy DRI V 
ER"!G05UBUB2 

1213 A^-'t flJGrtTa ff£D>PLEASE tS/MCf J ENTER {SPACE 3YO 
URCSPAC£}NAME!"sB0SUBllB2 

1214 PRINT"CÜP7 Ä7CHr223"C* ;! S0SUB1216 

1215 HI* (TR) =LEFT* (N*+" iSPACEIoy " , 1 1 } +T*: B0SUB1O 
77SGBTO1051 

1216 REHtt*####tt####*#H#*###tf *######### 

1217 REM#INPUT NAME # 
121 B REM#############M########*####### 

1219 N*="":X=0 

1220 P0KE19B,0 S WAIT19S,isGETA** IFA*=CHR*< 13) ANDX 
>OTHENPR INT" { SPACE * " : RETURN 

1221 IFA*<"A"DRA*> ,, Z"THEN1220 

1222 PRINTA*C*; 

1223 X=X+l:N*=N*+A*jIFK=10THENPRINT"<£P4ce>'':RET 
URN 

1224 G0T01220 

ENDE DES LISTINGS 



♦ ♦♦ TfeiI2 ♦♦♦ 



C-64 LISTING + CHECKSUMMEN (C Vl.O) 



1 000 REM####«######tt#tt*#tt«*#tt##**tttt##ft 

1001 REM* TURBD RACER TRACKPARTS tt 

1002 REM* # 

1003 REM« COPYRIGHT 1986 BY MR-BOFT # 

1004 REM# # 

1005 REM« RONALD MAYER * 

1006 REM« THENING 24 * 

1007 REM« A-4062 THENING/AU5TRIA * 

1 008 REM««*#tt«tt##*#««««##*#«###**#*### 

1009 REM#«#PART Ol #«#«*ft#tt«««*«*ff##### 



<214> 
<224> 

<189> 
<226> 
<223> 
<228> 

<25> 
<221> 

<51> 

<186> 

<145> 

<242> 

<!6> 

<250> 

<3> 

<116> 

<56> 

<240> 

<4B> 

<5G> 

<239> 



<lb> 

<163> 

<164> 

<213> 

<187> 



<144> 

<247> 
<105> 



<120> 

<63> 
<247> 

<4> 

<o> 

<221> 

<2> 

<169> 

<HO> 

<61> 

<115> 

<205> 
<5> 



<39> 

<102> 

<53> 

<133> 

<55> 

<153> 

<209> 

<4> 

<47> 

<90> 



Computronic 



1010 DATA" tSK SJ SIX<=>CSD SE_ S£ S06 y" <U6> 

1011 DATA" J S02 SM SPACE6 SL S« SWJQCS033" <109> 

1012 DATA'HUSff SPACE? 3 NVWX" <76> 

1013 REM*#«PART 02*##*#«#«*«*«*####««* <104> 

1014 DATA" I S02 SC SSJ A <*>{SD S£ SF S05>" <179> 

1015 DATA" C S03 SA SPACE6_ 3 NYQ <.S03y " <113> 

1016 DATA"HIJ£S* SP4CESJNVWX" <159> 

1017 REM##*PART 03###«##«****#*######« <11B> 

1018 DATA" £ SQ4 y ; A <=>?S{ SP5 > '■ <104> 

1019 DATA" t SQ3 >gt C SP>ieg5 >NVQCS033 " <37> 

1020 DATA"HIJ!CCSPACES3NVWX" <181> 

1021 REM##*PART 04###«#**###*#«##*###* < 132> 

1022 DATA"CSD53DS A 9CS<S053" <231> 

1023 DATA" {S03y9KC{ SPACE4 y NYQ {S03J " <1B4> 

1024 DATA"HI 3Ci $PAC£8 7N\JViX " <1B6> 

1025 REM###PART 05*##«###*#*####*####« <147> 

1026 DATA" tSQ5>DLMZ ES CS053 " <97> 

1027 DATA" t S03 >eKC{ SPy!CE4 >NYQ{ S03 3 " <189> 

1028 DATA"HIJC£SPj5C£S>NVWX" <190> 

1029 REM#««PART 06##««*##«##««#««#«### <16I> 

1030 DATA" CSP5>DL3--\BtS05> " <61 > 

1031 DATA" £S93y®KCi SPACE4 yWQ< SÖ3 y " <193> 

1032 DATA"HI JC { SPACES ! NVWX " <I94> 

1033 REM#«#PART 07##S»########«###«#*t« <175> 

1034 DATA"CSÖ5JDS*X«('•_<:S04> ,, <10> 

1035 DATA"C Sg3 >aKC{: SPyiCE? 3 ;Q{ S03 >" <93> 

1036 DATA " HI JC IS PACE3 1 NVWX " <198> 

1037 REM#SSPART 08#S*t**i####*#####**#«# <189> 

1038 DATA" £SOfc>n#&%it~) *C S02 i " <126> 

1039 DATA" tSf?3>@-t- , &CS PACE5 J ( t SQ3 y " <140> 

1040 DATA"HIJCCEP4Cee>VWX" <129> 

1041 REM###PART 09##«*S#*«***#*#«*««#*# <203> 

1042 DATA" < S < 36 >5#67%« A /01 " <60> 

1043 DATA" tS03>D324i SPACE6y . tSÖ2>" <6> 

1044 DATA' , HIJCCSe4C£9J-WX" '" <140> 

1045 POKES3281,OsPaKE532BO,0 <9B> 

1046 FÜRI^OTOBi PRINT "J CLEAR GREEN 7"; <182> 

1047 F0RJ=lTD3(READA*!PRINT"£flf^OW>"A*sNEXTJ <67> 

1048 X=1024 <93> 

1049 F0RK=24576+16»1T025344STEP256 " <B3> 

1050 F0RL=0T015: PPKEK+L ,PEEK (X+L) s NEXTLi X=X+40tN 
EXTK,I <250> 

ENDE DES LISTINGS 



.♦**Sifeii3 : S;:*>i4s 



C-64 LISTING + CHECKSUMMEN (C Vl.O) 

1000 REM###«»#*#*########««###*####**# <39> 

1001 REM« TURBO RACER SPRITES # <238> 

1002 REM« « <53> 

1003 REM« COPYRIGHT 1986 BY MR-SOFT # <133> 

1004 REM« # <55> 

1005 REM« RONALD MAYER # <153> 

1006 REM» THENING 24 # <209> 

1007 REM« A-4062 THENING/AUSTRIA # <4> 

1008 REM##tttt**«**#««#««*«*««#**#ft#«#tt# <47> 

1009 POKE53281 »Os PGKE532B0 . Oi PRINT" i CLEAR ORANGE 
ICREATINGt SP/ICP SPRITESI POHH }" ~ <246> 

1010 FORI=25344TG26431=READA:POKEI,AiS=S+AiNEXT <232> 

1011 IFSO75792THENPRINT"DATA{SP>5e£.>ERR0Rr":END <223> 
1Q12 PRINT"DATASC SP^CE ?DK! " <203> 

1013 DATAO, 0,0,0,0,0, 0,3, 171, 0,46,170,21, 170,170 
,8S,106,175,a5,255,253,B5,245 <215> 

1014 DATA127.8S, 253,251, 35,86,107,93, 85, 166, 93, 8 

6, 155,29,86, 125,21 ,85, 127,29 <226> 

1015 DATAB6, 222, 29, 86, 214, 21, B6, 233, 21, 86,168,21 
,84,0,5,80,0,0,0,0,0,0,0,0,0 <182> 

1016 DATAO, 0,0, 3, 171, 0,46,170,21, 170,170,85,106, 

175, B5, 255, 253, 85, 245, 127,85 _ <20> 

1017 DATA255,251,85,B6,107,85,B5,166,B5,86,155,2 

9,86, 125, 29, B5, 127, 21, 86, 222 <250> 

1018 DATA29, 86, 214, 29, 86, 233, 29, 86, 168,21 ,84, 0,5 

,B0, 0,0,0,0,0, 0,0, 0,0, 0,0,1 <123> 

1019 DATA64, 0,233,80,0,175, 252, 0,253, 95, 0,127, 25 
5,80,250,149,84,230,149,116 <195> 

1020 DATA233, 85, 116, 154, 149, 116, 229, 85,B4, 126,14 
9,116,247,149,116,154,149,84 <B9> 

1021 DATA150, 149,84, 104,21 ,84, 0,5, 80,0, 0;0,0, 0,0 
,0,0,0,0,0,0,0,0,0,0,1,64,0 <230> 

1022 DATA233, SO, 0,175,252, 0,253, 95, 0,127,255,80, 
250,149,84,230, 149, 84, 233, B5 <70> 

1023 DATAB4, 154, 149, 116, 229, 85, 116, 126, 149, 84, 24 
7,149,116,154,149,116,150,149 <250> 

1024 DATA116, 104,21,84,0,5,80,0,0,0,0,0,0,0,0,0, 



11 



Com 1 



L tnodö* 



c 



&1 




O ,0,0, 0,0, 0,0,0» 1,64, 0,5, 107 

1025 DATAO, 63, 250,0,245, 127, 5, 255, 253, 21, 86, 175, 
29, B6, 155,29,85, 107,29,06, 166 

1026 DATA21 , BS, 91 ,29,86, 109,29,86,223,21 ,86, 166, 
21,86,150,21,84,41,5,80,0,0 

1027 DATAO, 0,0,0,0,0, 0,0, 0,0,0,0,0, 0,0,0,1,64,0, 
5,107,0,63,250,0,245,127,5,255 

1028 DATA253,Zt ,86, 175,21 ,86, 155,21 ,65, 107,29,86 
, 166, 29, 85, 91, 21, B6, 189, 29, 06 

1029 DATA223, 29, 86, 166, 29, 86, 150, 21, 84, 41,5,80,0 
,0,0, 0,0, 0,0, 0,0,0,0,0,0,0,0 

1030 DATAO, 0,234, 192, 0,170,184, 0,170, 170, 84, 250, 
169, B5, 127,255,85,253,95,85 

1031 DATA239, 255, 85, 233, 149, 85, 154, 85, 117,230, 14 
9,117,125,149,116,253,85,84 

1032 DATA1S3, 149, 116, 151, 149, 116,107, 149, B4, 42,1 
49,84,0,21 ,84,0,5,80,0,0,0,0 

1033 DATAO, 0,0, 0,0,0,234, 192, 0,170,184, 0,170,170 
,84,250,169,85,127,255,85,253 

1034 DATA7S,B5,239,255,B5,233,149,S5,i54,B5,B5,2 
30,149,85,125,149,116,253,85 

1035 DATA1 16, 183, 149, 84, 151, 149, 116, 107, 149, 116, 
42,149,116,0,21,84,0,5,80,0 

1036 DATAO, 0,0, 0,0, 0,0,0,0,0, 0,14,0,86, 186, 1,85, 
170, 1 , 127,255, 1 ,245, 125,5,255 

1037 DATA255, 21, 86, 155, 29, 86, 107, 29, 85, 166,29 ,86 
, 155,21 ,85, 125,29,86,223,29 

1038 DATA86,246,21 ,B6, 150,21 ,84, 169,21 ,B4, 0,5,80 
,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

1039 DATAO, 0,14, 0,86, 186,1,85,170, 1,127, 255, 1,24 
5, 125,5,255,255,21 ,B6, 155,21 

1040 DATA86, 107, 21, B5, 166, 29, 86, 155,29,85,125,21 
,86,223,29,86,246,29,86,150 

1041 DATA29,B4, 169, 21 ,84, 0,5, 80, 0,0, 0,0,0,0,0,0, 
0,0,0,0,0,0,176,0,0,174,149 

1042 DATAO, 170,85,64,255,253,64, 125,95,64,255,25 
5,80,230,149,84,233,149,116 

1043 DATA154, 85, 116, 230,149,1 16, 125, 85, B4, 247, 14 
9,116,159,149,116,150,149,84 

1044 DATA106, 21, 84,0,21,84,0, 5, BO,0, 0,0,0,0,0,0, 
0,0,0,0,0,0,176,0,0,174,149 

1045 DATAO, 170,85,64,255,253,64, 125,95,64,255,25 
5,80,230,149,84,233,149,84,154 

1046 DATAB5, 84, 230, 149, 116, 125, B5, 116, 247^1 49, 84 
,159,149,116,150,149,116,106 

1047 DATA21, 116, 0,21, 84, 0,5,80,0,0,0, 0,0,0,0,0,0 
,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

1048 DATAO, 0,0,0,0,0, 0,0, 0,0, 0,0, 0,0, 0,25, 0,0, 25 
,0,0,4,0,0,0,0,0,0,0,0,0,0,0 

1049 DATAO,0, 0,0,0,0,0, 0,0, 0,0, 0,0, 0,0, 0,0,0,0,0 
,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

1050 DATAO, 0,0,0,0,0, 85, 64, 0,102,64,0,102,64,0,8 
5,64,0,4,0,0,4,0,0,0,0,0,0,0 

1051 DATAO, 0,0,0,0,0, 0,0,0,0,0, 0,0, 0,0,0,0,0, 0,0 
,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

1052 DATA1, 85, BO, 1,170, 144, 1,149, 144, 1,170, 144,1 
,149,144,1,170,144,1,85,80,0 

1053 DATA4, 0,0, 4, 0,0, 4, 0,0,4,0,0, 0,0, 0,0,0,0,0,0 
,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

1054 DATAO, 0,5, 85, 84, 6, 170,164, 6, 149, 100,6,90,16 
4,6,85,164,6,149,100,6,170,100 

1055 DATA6, BS, 164, 6, 170, 164, 5, 85, 84, 0,4,0,0,4,0, 
0,4,0,0,4,0,0,4,0,0,0,0,0,0 

1056 DATAO, 0,0,0,0,B5, 85, 85, 106, 170, 169, 106, 85,1 
05,105,85,105,105,90,169,105 

1057 DATA85, 169, 105,85,105, 106,85, 105, 106, 165, 10 
5,105,85,105,105,85,169,106 

1058 DATA170, 169, 85, 85, 85, 0,20,0,0,20, 0,0,20,0,0 
,20,0,0,20,0,0,20,0,0,20,0,0 

ENDE DES LISTINGS 



;**-+:-lteit4:,'+:+. ; * 



C-64 LISTING + CHECKSUMMEN tC Vl.O) 

1 000 REM**«*«««««*****««************** 

1001 REM« TURBO RACER CHARACTER5 # 

1 002 REM* ■ # 

1003 REM« COPYRIGHT 1986 BY MR-SOFT # 

1004 REM* * 

1005 REM* RONALD MAYER # 

1006 REM» THENING 24 # 

1007 REM« A-4062 THENING/AUSTRIA « 

1 008 REM*«*««******«*«**«**«*«******** 

1009 P0KE532Sl,0:PaKE53280,0:PniNT",CCt£^W ORANGE 



<20> 

<175> 

<134> 

<213> 

<176> 

<60> 

<225> 

<194> 

<179> 

<242> 

<120> 

<37> 

<31> 

<4> 

<155> 

<141> 

<192> 

<22B> 

<211> 

<16B> 

<201> 

<74> 

<139> 

<207> 

<134> 

<6B> 

<86> 

<70> 

<160> 

<248> 

<B1> 

<105> 

<212> 

<31> 

<254> 



<39> 

<14B> 

<53> 

<133> 

<55> 

<153> 

<209> 

<4> 

<47> 



JCREATINGCSP/ICEJCHARACTERStDOM« ** 

1010 F0Rl=3072OT032383iREADA:P0KEI ,A* S=S+AiNEXT 

101 1 IFS<>195344THENPRINT"DATA<:S£4C£>ERROR! "lEND 

1012 PRINT"DATASt SP>ICE JOK; " 

1013 DATA60, 66, 153,161 , 161 , 153,66,60,0,60,102,25 
4,230,230,230,230,0,252,198 

1014 DATA252, 198,254, 254, 252, 0,124, 230, 224, 224, 2 
54,254,124,0,252,194,194,194 

1015 DATA254, 254, 252, 0,254, 192, 248, 192, 254, 254, 2 
54,0,254,240,252,240,240,240 

1016 DATA240, 0,124, 224, 236, 230, 254, 254, 124, 0,230 
,230,230,254,230,230,230,0,254 

1017 DATA56, 56, 56, 254, 254, 254, 0,6, 6, 230, 230, 254, 
254, 124, 0,230,236, 248, 24B, 252 

1018 DATA238, 238,0, 192, 192, 192, 192,254,254,254,0 
,198,238,254,254,254,230,230 

1019 DATAO, 230, 230, 246, 254, 254,238, 230, 0,124,230 
,230,230,254,254,124,0,252,230 

1020 DAT A230, 254, 252, 240, 240, 0,124,230,230,238,2 
52,254,126,0,252,230,230,254 

1021 DATA252,23B,23B, 0,124,224, 124, 14, 254, 254, 25 
2,0,254,254,254,56,56,56,56 

1022 DATAO, 230, 230, 230, 230,254, 254, 124,0,230,230 
,230,230,124,124,56,0,230,230 

1023 DATA230, 254, 254, 238, 198, 0,230, 230,60, 60, 2S4 
,230,230,0,230, 19B, 254, 124,56 

1024 DATA56, 56, 0,126, 28, 56, 112, 254, 254, 254,40,40 
,40,40,40,40,40,40,0,56,56,56 

1025 DATAO, 56, 56, 56, 20, 20, 20, 20,20,20, 20,20,120, 
124,126,127,127,126,124,120 

1026 DATA30, 62, 126, 254, 254, 126, 62,30,0,0,0,0, 0,0 
, 0,0, 0,60,60, 60, 12, O, 60, 60, 23B 

1027 DATA238, 102,0,0,0, 0,0, 0,170,255,255, 255, 255 
,255,170,0,170,254,254,254,254 

102B DATA2S4, 170,0,170, 250, 250, 250,250,250,170,0 
,170,234,234,234,234,234,170 

1029 DATAO, 170,170, 170,170, 170,170, 170,0,0,170,1 
70,170, 170, 0,O,0,O,B5, BS, B5 

1030 DATA85, 0,0, 40,40,42, 42, 42, 42, 0,0, 40, 40, 104, 
88, SB, 84, 0,0,20,20, 148, 164, 164 

1031 DATA168, 0,0,0,0,0,126, 0,0,0,0,0, 0,0, 0,0,24, 
24,0,20,20,21,21,21,21,0,0,0 

1032 DATA124, 230, 230, 230, 254,254, 124,0,56, 120,56 
,56,254,254,254,0,124,206,28 

1033 DATA120, 254, 254, 254, 0,126,6,28,198,254,254, 
124,0,28,60,124,220,254,254 

1034 DATA28, 0,254, 224, 252, 6, 230, 254, 124, 0,124, 22 
4,252,230,254,254,124,0,254 

1035 DATfU4,30,60, 124,248,248,0, 124,206, 124,206, 
254,254,124,0,124,206,126,14 

1036 DATA254, 252, 248,0,56,56,56, 0,56,56,56, 0,0, 4 
2,26,26,22,20,20,0,0, 168, 16B 

1037 DATA168, 168,40,40,0,0,21,37,37,41,40,40,0,0 
,84,84,84,84,20,20,0,252,254 

1038 DATA2, 60,0,56,56, 0,0, 255, 255, 255, 255, 0,0, 60 
,60,60,60,60,60,60,60,7,15,31 

1039 DATA62,124,24B,240,224,224,240,248,124,62,3 
1,15,7,192,128,0,0,0,0,0,0,3 

1040 DATA1, 0,0, 0,0, 0,0, 0,0,0,0, 0,0, 128, 192, 0,0,0 
,0,0,0,1,3,0,0,224,248,254,255 

1041 DATA31, 7, 0,0, 7, 31, 127, 255, 248,224, 60,60, 60, 
120,120,240,240,224,60,60,60 

1042 DATA30, 30,15,15,7, 0,0, 7, 31, 31, 63, 62, 60, 0,0, 
224, 24B, 248,252, 124,60,60,62 

1043 DATA63, 31 ,31, 7, 0,0,60,124, 252, 248, 248, 224,0 
,0,7,31,255,254,248,224,0,0 

1044 DATA224, 248, 255, 127, 31, 7,0, 0,224, 240, 240, 12 
0,120,60,60,60,7,15,15,30,30 

1045 0ATA6O, 60,60,60, 60, 60, 60,255,60, 60,60,0,0, 6 
0,64,56,4,120,0,16,16,255,255 

1046 DATA255, 255, 16,16,0,16,56,124,16,16,16,0,0,. 
0,16,48, 126, 4B, 16, 0,0, 3, 14, 13 

1047 DATA61, 53, 245, 245, 48,216, 218, 102, 90, 86, 150, 
85,14,13,181,181,245,246,213 

1048 DATA213, 0,0,0,0,52, 54, 218, 213, 89,85,86,85,8 
9, 149, B5,B9, 0,0,0,0,48, 56, 214 

■1049 DATA214, 0,0,0,3,3, 13, 189, 181,149,165,101,10 
5, 105, 170,90,106, 128, 128,128 

1050 DATA160, 96,104,170, 102,0,0,0,0*123, 160,104, 
106,91,103,95,94,189,125,245 

1051 DATA253.0, 0,131,131,99,109,173,109,255,213, 
221,213,221,213,221,213,254 

1052 DATAB6, IIB, 86,1 18, B6, IIB, 86, 213, 213, 221, 213 
,221,213,221,213,86,86,118,86 

1053 DATA1 18,86, 119,86,255,85, 125,85,125,85, 125, 



<7B> 
<236> 
<216> 
<203> 



<151> 
<24> 
<1&2> 
<90> 
<179> 
<142> 
<228> 
<128> 
<96> 
<244> 
<124> 
<168> 
<115> 
<1B6> 
<33> 
<131> 
<181> 
<131> 
<19S> 
<133> 
<B> 
<46> 
<6S> 
<132> 
<211> 
<57> 
<97> 
<236> 
<241> 
<36> 
<57> 
<69> 
<179> 
<21> 
<147> 
<20B> 
<B0> 
<237> 
<30> 
<204> 
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B5,85,B5, 125,85, 125,85, 125,85 

1054 DATA3, 3, 15, 15, 63, 61,253,253, 128, 128, 160,160 
, 168, 104, 106, 106, B, 51 ,62,233 

1055 DATA58,! 1,0,0, 0,0,192,120, 126, 190,232, 0,0, 5 
0,205,119,206,60,0,0,0,0,7,11 

1056 DATA29, 235, 12, 0,0, 0,96,232,60, 255, 112,0, 0,0 
,0,0,O,l,5,21,O,O,0,O,0,12B 

1057 DATA160, 163,42,10,2, 0,0, 0,0, 0,168, 160, 128,0 
,0,0,0,0,0,170,170,170,0,0,0 

1058 DATAO, 0,0, 0,0,255, 255, 255, 170, 0,0, 2, 2, 2, 2,1 
0,10,10,10,2,2,2,2,0,0,170,170 

1059 DATA170, 171, 175, 175, 191, 191, 170, 170, 170,234 
,250, 186, 233, 238, 191, 191, 175 

1060 DATA175, 171,170, 170,170,254,254,250,250,234 
,170,170,170,0,0, 128,128,123 

1061 DATA128, 160, 160, 160, IAO, 128, 12B, 128, 128, 0,0 
, 255 , 255 , 255 , 255 , 254 , 249 , 229 

1062 DATA149, 254, 249 ,229, 149, 95, 85, 85, 85, 149, 85, 
B5,g5,86,BB,96,12B,B6,89,96 

1063 DATA129, 0,0,0,0,255, 255, 255, 255, 255, 254, 249 
,229,255,254,249,229,149,85 

1064 DATAB5, 85, 255, 255, 254, 249, 229, 149, 85, 85, 229 
,149,B5, 85,86,88,96, 128,255 

1065 DATA255, 255, 255, 255, 255, 255, 250, 255, 255, 255 
,254,249,229,149,85,254,249 

1066 DATA165, 85, 86, 88, 96, 128, 255, 254, 249, 229, 150 
,88,96,128,255,255,254,249,230 

1067 DATA152, 96, 128,254, 216, 96, 128,0, 0,0, 0,149, 3 
7,9,2,0,0,0,0,86,85,85,85, 149 

106B DAT A37, 9, 2,191, 111 „91,86, 85, 85^85,95,255, 25 
5,255,255,191,111,91,86,255 

1069 DATA191, 1 11, 91, B6, 85, 03 S B5, 255, 255,255, 255, 
255» 191, 111, 91,91,86, 85 ,S5, 149 

1070 DATA37, 9,2,255,235, 191 ,111 ,91 ,B6 . 85*85, 191 , 
111,90,85,149,37,9,2,255,255 

1071 0ATA2S5, 191 , 11 i ,91 ,86,85,255,255,255,255,25 
5,255,255, 175,255, 191 ,lil.?l 

1072 DATAJ,50 5 37,9,2,191,39,9,2,0,0,0,Ö,255,255,1 
91,111,155,38,9,2,150,11 ,47 

1073 DATA39, 38, 9, 9, 2, 255, 102,96,120,0, 0,0, 0,166, 
0,0,0,0,0,0,0,2,11,39,47,47 

1074 DATA159, 159, 159, 0,0, 0,0, 0,0, 0,0, 159, 155, 155 
,150,37,37,9,2,0,0,0,0,0,0,0 

1075 00700,255,255,255,254,233,150,104,128,255,2 
55,233,150,104,128,0,0,255,149 

1076 DATA106, 128, 0, O, 0,0, 86, 16B, 0,0, 0,0,0,0,37, 9 
,9,2,0,0,0,0,155,155,155,155 

1077 DATA155, 150, 38, 38, 166, 0,0, 2, 9, 9, 37, 39,33,10 
,39,159,127,127,255,255,255 

1078 DATA255, 254, 233, 149, 86, 88, 160, 250, 229, 154, 9 
6,128,0,0,0,155,155,150,37,37 

1079 DATA9, 9, 2, 9, 38, 38, 150, 155, 155, 155,155,90,0, 
0,0,0,2,2,9,166,0,0,10,37,155 

1080 DATftll 1 , 191 , 150,43, 151 ,127,255,255,255,255, 
233, 149, B6, 104, 12B, 0,0,0,255 

1081 DATA255,254,233,149,86, 104, 128,90,96,128,0, 
0,0,0,0,255,255,255,255,255 

1082 DATA254,233, 149,255,255,250, 165,90, 160, 0,O, 
255,250,165,90,160,0,0,0,166 

1083 DATA248, 246, 246, 246, 216, 96, 96, 255, 166,9,2,0 
,0,0,0,246,230,216,216,152,96 

10S4 DATA96,12B,150,224,24B,24B,246,246,246,246, 
255,166,0,0,0,0,0,0,255,159 

1085 DATA42, 0,0,0,0,0, 255, 255,95, 165, 10, 0,0, 0,25 
5,255,255,255,91,149,41,2,88 

1086 DATA96.96, 128,0,0,0,0,216,214,214,214,230,2 
30,230,152,90,0,128,96,224,216 

1087 DATA216, 216, 150,232,246,253,255,255,255,255 
,255,255,255,95,165,10,0,0,255 

10B8 DATA255, 255, 255, 255, 86, 165, 10,255,255, 255, 2 
55,255,255,111,91,230,230,150 

1089 DATAB8, 88, 96, 96, 128,88,214, 230, 230, 214, 230, 
230,230, 153, 0,0, 0,0,0, 96, B8 

1090 DATA165, 0,0,128,104, 214, 245, 253, 150, 232, 254 
,255,255,255,255,255,149,41 

1091 DATA2, 0,0,0,0,0, 175, 90,149,41, 2, 0,0, 0,255, 2 
55,175,90,149,37,9,2,255,255 

1092 DATA255,255,255,255,255,255 
ENDE DES LISTINGS 
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<202> 

<16B> 

<192> 

<162> 

<94> 

<221> 

<102> 

<124> 

<149> 

<37> 

<195> 

<107> 

<37> 

<107> 

<17> 

<0> 

<97> 

<204> 

<112> 

<80> 

<158> 

<40> 

<39> 

<31> 

<217> 

<212> 

<16> 

<161> 

<154> 

<61> 

<115> 

<56> 

<139> 

<59> 

<179> 

<187> 

<128> 

<142> 

<165> 
<145> 



1001 REM# TURBO RACER 

1002 REM* 

1003 REM# COPYRIGHT 19B6 

1004 REM* 



CODES # 

# 

BY MR-SÜFT # 

# 



1005 REM* RONALD MAYER * 

1006 REM* THENING 24 * 

1007 REM* A-4062 THENING/AUSTRIA # 

1008 REM****#*####*########tt*##*#*#### 

1009 F0KE532Bl,0:F0KE552BO,O;PRINT"{Cfjf»g ORANGE 
JCREATINGtSP4C£;>CDDESCP0H«>" ~ 

1010 F0RI=3276BT03537OsREADA:P0KEI ,Af S=S+A:NEKT 

1011 IFS<>242B30THENPRINT' , DATA{£P4C£>ERR0R' "sEND 

1012 GOTOI13B 

1013 DATAO, 40,80,120, 160,1,1,2, 2, 3, 3, 4, 4, 5, 5, 6, 6 
,7,7,8,8,9,9,9,10,10,10,11,11 

1014 DATA1 1,12, 12, 12, 12, 13, 13, 13, 13, 14, 14, 14, 14, 
14,14,14,1,2,3,4,5,6,7,8,9,10 

1015 DATA1 1,1 1,12, 12, 13, 13, 14, 14, 14, 15, 15, 15, 16, 
16, 16, 17, 17, 17, 17, 18, 18, 1B, 18 

1016 0ATA19, 19, 19, 19, 20, 20, 20, 2, 4, 6, B, 10, 11, 12,1 
3,14,15,16,16,17,17,18,18,19 

1017 DATA19, 19, 20,20,20, 21, 21, 21, 22, 22, 22, 22, 23, 
23 , 23 , 23 , 24 , 24 , 24 , 24 , 24 , 24 , 21 

I01B DATA2, 5, 7, 10, 12, 14, 16, IQ, 20, 22, 23, 24, 25, 26, 
26, 27, 27, 28, 2B, 29, 29, 30,30,30 

1019 DATA31, 31, 31, 31, 32, 32, 32, 32, 33, 33, 33, 33, 33, 
33,33,33,2,6,10, 13,16,18,20 

1020 DATA22, 24,26, 27, 28, 29, 30,31,31 ,32,32,33,33, 
34,34,34,35,35,35,36,36,36,37 

1021 DATA37, 37, 3B, 38,38,39, 39, 39, 40,40,254, 226,1 
99,174,150, 130, 114,100,87,75 

1022 DATA64, 37,50,43, 37,32.2B, 25, 22,19, 20, iBO, 19 

, 18, 1 7, 64 , 1 7, iB, 19,100,19, 34 

1023 DATAS1, 34, 19, 64,21,22, 23, 72, 23,22, 21, 132, 21 
,54,21,164,19,50,19,68,19,34 

1024 DATA19,20, 21, 33,21,132,19, IG, 17, 64, 17, 18, 19 
, 1 76, 19, 34 , 61,34, 19, 148, 19, IB 

1025 DATA17, 64, 17, 18, 19, 132, 21, 22, 23, 72, 23, 22, 21 
,68,21,22,23,104,23,22,21,20 

1026 DATA19, 50, 19, 100,19,18, 17, 64, 17, 18, 19, 137,1 
9,50,19,20,21,54,21,68,21,54 

1027 DATA21,20,19,50,19,68,19,1B,17,64,17,1B T 19, 
164,20,164,21,22,23,163,23,22 

1028 DATA21, ISO, 19, 50, 19, 20, 21, 54, 21, 84, 21, 54, 21 
,20,19,50,19,148,19,18,17,160 

1029 DATA17, IB, 19, 68,21, 38, 87,88,23, 22, 21, 6B, 21, 
22, 23, 72, 23, 22, 21, 20, 19, IB, 17 

1030 DATA160, 17, 18, 19, 20,21,54, 21, 20,19,50, 19, 16 
4,19,18,17,160,17,18,19,20,21 

1031 DATA54,21 , 148,21 ,38,39,72,23, 22,21 , 148, 19,1 
8,17,64,49,50,19,36,21,38,183 

1032 DATA38, 21, 36, 19, 34, 81, 34, 19, 100, 19, 50, 19, 14 
8,19,66,65,112,17,18,19,164 

10^3 DATA20, 164,21 ,22,23, 168,23,22,21 , 148, 19, 18, 
17, 160, 17, IB, 19,68,21 ,54,21 

1034 DATA20, 19, SO, 19, 84, 19, 18, 17, 64, 17, 18, 19, 20, 
21,22,23,72,23,22,21,132,19 

1035 DATA18,17,64,17,1B,19,14B,19,50,19,164,19,5 
0,19,68,19,18,17,64,17,18,19 

1036 DATA148,21,22,23,72,23,22,21,B4,Z1,22,23,72 
,23,22,21,20,19,50,19,20,21 

1037 DATA54, 21, 20, 19, 18,17,64, 17, 18, 19, 84,19,50, 
19,20,21,54,21,20,19,18,17,64 

1038 DATA17, 18, 19, 20, 21 ,54,21,148,19,50,19,68,19 
, 18, 17, 112, 17, 18, 19, 14B, 21 ,54 

1039 DATA21, 164, 20,148,21, 22, 23, 72, 23, 22, 21, 20,1 
9,18,17,64,17,18,19,68,21,54 

1040 DATA21 ,20, 19,50, 19,20,21 ,22,23, 168,23,22,21 
,20,19,18,17,80,33,34,19,148 

1041 DATA19, 66, 33, 64, 17, 18, 19, 148, 19, 50, 19, 20, 21 
,54,21,20,19,34,81,34,19,116 

1042 DATA21, 22, 23, 72, 23, 22, 21,20,19, 16,17,64,17, 
IB, 19, 164, 164, 19, 34, Bl, 34, 19 

1043 DATA212, 19, 34, 81,34,19, 164, 132, 19, 34, 81, 34, 
19,132,19,18,17,64,17,18,19 

1044 DATA196,19,i8,17,64,17,18,19,i4S,21,22,23,B 
8, 55, 3B, 21, 20,19,50, 19,20,21 

1045 DATA22, 23, 72,23, 22, 21, 68,21,54, 21, 20,19,50, 
19,20,21,22,23,72,23,22,21,164 

1046 DATA120, 50, 12, 13, 71, 69, 65, 82, 85, 80, 32, 76, 68 
,88,67,79,85,78,84,71,69,65 

1047 DATA82.0, 131 ,76,9, 131 ,76,33, 131 ,76,199,134, 
120,169,56,162,131,141,20,3 

1048 DATA142, 21, 3, 169, 1,141, 13, 220, 141, 26,208,14 
1 ,62,3,88,96, 120,169,49, 162 



<164> 

<53> 

<133> 

<55> 

<153> 

<209> 

<4> 

<47> 

<152> 
<60> 
<161> 
<89> 

<24> 

<79> 

<117> 

<97> 

<B4> 

<Z21> 

<101> 

<15> 

<127> 

<249> 

<145> 

<92> 

<197> 

<178> 

<78> 

<129> 

<166> 

<61> 

<60> 

<231> 

<14> 

<119> 

<103> 

<221> 

<186> 

<&1> 

<23> 

<244> 

<3> 

<60> 

<201X 

<26> 

<140> 

<233> 

<227> 

<154> 
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1049 DATA234, 141 ,20, 3, 142, 21 ,3, 169, 129, 141, 13, 22 
0,169, 0,141, 26,206, SS, 96, 173 

1050 DATAZ5, 208, 141, 25, 208,173, 17, 208, 41, 127, 141 

,17,208,174,62,3,189,159,131 

1051 DATA141,lS,20B,189,i67,131,141,33,20B,lB9,l 

75,131,141, 34, 20B,1B9, 183, 131 

1052 DATA141, 35, 208, 189, 199, 131, 141, 22, 208, 224, 7 

,208,5,169,255,141,62,3,238 

1053 DATA62, 3, 138, 240,3,76,129, 234, 173, 69, 3, 141, 
0,212,173,70,3,141,1,212,173 

1054 DATA77,3,240, 18,201 ,2, 176,6,32, 152,136,76,1 
51,131,32,252,136,169,0,141 

1055 DATA77, 3, 76, 49, 234, 150,202,206,210,214,222, 
234,255,15,3,12,12,12,12,12 

1056 DATA12, 12, 9, 1,2, 1,2, 1,2, 1,8, 0,0, 0,0,0,0,150 
,202,206,210,214,222,234,255 

1057 DATA216,20a,20B,208,208,20a,208,20B,173,191 
,3,240,4,206,191,3,96,173,68 

Io5S DflTfl3, 141 , 191 ,3, 173,61 ,3,201 , 1 , 144,20,240,6 
,238.161,131,238,162,131,238 

1059 DATA163, 131, 32, 96, 137, 32, 210,133,32,240, 135 
,238,164,131,238,165,131,32 

1060 DATA246, 137, 32, 246, 137, 32, SB, 136, 32, 131, 136 
,173,165,131,201,246,144,3,32 

1061 DATA37, 132, 238, 61, 3, 173, 61, 3, 201, 3, 144, 5, 16 
9,0,141,61,3,96,173,18,208,201 

1062 DATA10, 176, 249, 162, 0,189, 191, 131, 157, 159, 13 
1,232,224,8, 144,245,162,2, 1B9 

1063 DATA175, 131, 201, 2, 240, B, 169, 2, 157, 175, 131, 7 
6,79,132,169,1,157,175,131,232 

1064 DATA224,8,144,231,96,173,iB5,3,240,4,206,19 
5,3,96,169,200,141,185,3,162 

1065 DATA9, 189, 152,65,201 ,39, 144,9,202, 16,246, 16 
9,2,141,60,3,96,254,152,65,206 

1066 DATA132, 3, 96, 173, 192, 3, 240, 4, 206, 192, 3, 96,1 
69,100,141,192,3,162,9,189,32 

1067 DATA65, 201 ,39, 144, 9, 202, 16, 246, 169,3,141,60 
,3,96,254,32,65,206,133,3,96 

1068 DATA174, 134, 3, 224, 8, 240, 20, 169, 2, 157, 169, 21 
6,232,232,142,134,3,169,5,157 

1069 DATA169, 216, 169, 0,141, 72, 3, 96, 174, 134, 3, 224 
,0,240,27,169,2,157,169,216 

1070 DATA202, 202, 142, 134, 3, 169, 5, 157, 169, 216, 173 
,136,3,201,4,144,5,169,40,141 

1071 007072,3,96,173,188,3,240,4,206,188,3,96,16 
9,20,141,188,3,162,0,189,188 

1072 DATA64, 201, 36, 176, 11, 232, 224, 10,144,244, 169 
, 4, 141, 60, 3, 96, 222, IBB, 64, 238 

1073 DATA135, 3, 96, 173, 188, 3, 240,4,206, 188, 3, 96,1 
69, iöO, 141 ,188,3, 162,9, 189, 188 

1074 DATA64, 201, 39, 144, 9, 202, 16, 246, 169, 0,141, 13 
5,3,96,254,188,64,206,135,3 

1075 DATA96, 173, 186, 3, 240,4,206, 186, 3, 96, 169, 6,1 
41,186,3,162,0,189,52,65,201 

1076 DATA36, 176, 11, 232, 224, 10, 144, 244, 169, 40, 141 
,136,3,96,222,52,65,238,136 

1077 »ATA3, 96, 173, 187, 3, 240,4,206, 187, 3, 96, 169, 3 
,141,187,3,162,9,189,52,65,201 

1078 DATA39, 144, 9, 202,16,246,169, 0,141, 136, 3,96, 
254,52,65,206,136,3,96,173,189 

1079 DAT A3, 240,4,206, 189,3,96, 169,150, 141, 1B9, 3, 
162,0,189,172,65,201,36,176 

1080 DATA1 1,232, 224, 10, 144, 244, 169, 40, 141, 137, 3, 
96,222, 172,65,23B, 137,3,96, 173 

1081 DATA189, 3, 240,4,206, 189, 3, 96, 169, 150,141, 18 
9,3,162,9,189,172,65,201,39 

1082 DATA144, 9, 202, 16, 246, 169, 0,141, 137, 3, 96, 25t 
,172,65,206,137,3,96,173,248 

1083 DATA67 , 73 , 1 , 141 ,248 , 67 , 173 ,249 ,67 ,73 , 1 , 141 , 
249,67,96,173,53,64,201,57,240 

1084 DATA28,162,4,189,53,64,201 ,57,176,4,254,53, 
64,96,169,48,157,53,64,202,48 

1085 DATA247,224,2,20B,233,76,252,133,169,1,141, 
63,3,96,173,77,64,201,48,240 

10B6 DATA4, 206, 77, 64, 96, 169, 1,141, 60, 3, 96, 173, 64 
,3,10,10,10,10,133,254,160,15 

1087 DATA169,96, 133,255, 177,254, 153,4,67,230,255 
,177,254,153,44,67,230,255,177 

lOBB DATA254,~153,B4,67, 136, 16,230,96,173,78,3,24 
0,4,206,78,3,96,173,137,3,74 

1089 DATA141,BO,3,56,169,44,237,80,3,141,7B,3,17 
3,0,220,41,4,208,20,173,0,208 

1090 DATA201, 72, 144, 40, 169, 141, 141 ,248, 67, 169, 14 
2, 141 ,249,67,76, 177, 134, 173 

1091 DATAO, 208,201 ,253,176,20, 173,0,220,41,8,208 
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<158> 

<222> 

<175> 

<54> 

<1C5> 

<15l> 

<143> 

<169> 

<138> 

<99>' 

<45> 

<9> 

<54> 

<131> 

<145> 

<111> 

<197> 

<142> 

<22B> 

<33> 

<68> 

<234> 

<91> 

<106> 

<18> 

<B7> 

<3> 

<241> 

<195> 

<164> 

<169> 

<22> 

<46> 

<63> 

<122> 

<36> 

<98> 

<166> 

<205> 

<94> 

<180> 

<1B2> 



, 13, 169, 145, 141 ,248,67, 169, 146 

1092 DATA141, 249, 67, 76, 157, 134, 169, 149, 141, 248, 6 
7,169, 150, 141, 249, 67, 96, 23S 

1093 DATA0,2O8,23B,2,20B,i73,2,208,208,S,i73,I6, 
20B,9,2,141,16 5 2OB,96,2O6,O 

1094 DATA208, 206,2,208, 173, 2, 208, 201 ,255, 208, 8,1 
73,16,208,41,253,141,16,208 

1095 DATA96, 32, 190,135,32,30,136,173,182,3,208,1 
1,32,227,133,32,107,135,169 

1096 DATA200, 141, 182, 3*206,182,3,173, 137, 3, 240, 2 
0,74,201,20,144,2,169,19,170 

1097 DATA189,205, 128, 141 ,68,3,32,207,131 ,32,67,1 
34,206,183,3,173,184,3,205,136 

109B DATA3, 176, 8, 169, 220,141, 184, 3, 32, 85, 132, 206 
,1B4,3,32,154, 135,32,30, 135 

1099 DATA173, 60, 3, 240, 1,96, 76, 199, 134, 173,190, 3, 
240,4,206,190,3,96,169,200,141 

HOO DATA190, 3, 173, 0,220,41,16, 240, 23, 173,0,220, 
41,1,208,6,32,61,136,76,74,135 

1101 DATA173,0, 220,41,2,208, 3, 32, 75, 136, 173, 134, 
3,240, 10, 173,136,3,201 , 10, 176 

1102 DATA3, 32, 75, 136, 173, 136, 3, 201, 2B, 144, 3, 76, 2 
26,132,201,20,176,3,76,11,133 

1103 DATA96, 173, 0,220,41,16, 240, 6, 169,0,141, 67, 3 
,96,173,67,3,240,1,96,173,0 

1 104 DATA220, 41 ,2,208,7,32, 163, 132,238,67,3,96, 1 
73,0,220,41,1,208,6,32,191,132 

1105 DATA23B, 67, 3, 96, 173, 136, 3, 240, 17, 173, 134, 3, 

74, 170, 189,0, 12B,24, 109,136 „,.,,.„„ tJtJt 

1106 DATA3, 170, 202,189, 5, 128, 205, 137, 3, 240, 8, 144 
,3,76,130,133,76,171,133,96 

1107 DATA173, 193, 3, 240, 4, 206,193, 3,96, 169,0, 141, 
193,3,173,136,3,205,70,3,240 
HOB DATA27,144,12,23B,69,3,173,69,3,20B,17,23B f 

70,3,96,206,69,3,173,69,3,201 

1109 DATA255, 208,3, 206, 70, 3, 96, 173, 2, 208, 201,112 

, 176, 3B, 32, 75, 136, 162, 129, 142 

1110 DATA1 1,212, 202,142, 11, 212, 32, 124, 132, 173,71 
,3,73,1,141,71,3,240,7,238,1 

IUI DATA208, 238, 3, 208,96,206, 1,208, 206, 3, 20B, 96 
,173,194,3,240,4,206,194,3,96 

1112 DATA169, 30, 141, 194, 3, 173, 72, 3, 205,136, 3, 240 
,8,144,3,76,50,133,76,91,133 

1113 DATA96, 174, 72, 3, 232, 224, 41, 144, 2, 162,40, 142 
,72,3,96,174,72,3,202,138,16 

1114 DATA2, 169, 0,141,72.3, 96, 173, 74,3, 240, 4, 206, 
74,3,96,238,73,3,173,73,3,197 

1115 DATA251, 144, 5, 169, 0,141, 73, 3, 168,177, 252, 72 
,41,15,141,64,3,104,41,240,10 

1116 DATA141, 74, 3, 76, 29, 134, 173, 64, 3, 201,4,240,1 
3,144,6,169,1,141,77,3,96,169 

1117 DATA2, 141, 77, 3, 96, 173, 200,131, 41 ,7, 240, 4, 20 
6,200,131,96,173,200,131,9^7 

1118 DATA141, 200, 131, 173, 48, 66, 72, 173, 89, 66, 72,1 
73,128,66,72, 173, 16B,66,72, 173 

1119 DATA20B, 66, 72, 162, 0,160, 1,185, 48,66, 157, 48, 
66, 185,88,66, 157,88,66, 185, 128 

1120 DATA66, 157, 128,66, 185, 168,66,157,168,66,185 
,208,66,157,208,66,200,232,192 

1121 DATA40, 144, 220, 104,141, 247, 66, 104, 141, 207, 6 
6,104,141,167,66,104,141,127 

1122 DATA66, 104, 141, 87, 66, 96, 173, 200, 131, 41, 7, 20 
1,7,240,4,238,200,131,96,173 

1 123 DATA2O0, 131 ,41 ,248, 141 ,20O, 131 ,173,87,66,72 
,173,127,66,72,173,167,66,72 

1124 DATA173,207,66,72, 173,247,66,72, 162,39, 160, 
38, 1B5, 48, 66, 157, 48, 66, 185, SB 

1125 DATA66, 157, 8B, 66, 185, 128, 66, 157, 128, 66, 185, 
168,66,157,168,66,185,208,66 

1126 DATA157,20B, 66, 202, 136, 16, 222, 104,141, 208,6 
6, 104, 141 , 168,66, 104, 141 ,128 

1127 DATA66, 104,141, RS, 66, 104, 141 ,48, 66, 96, 173, 7 
5,3,208,56,174,73,3,202,228 

J12B DATA251,144,47,169,1,141,75,3,169,152,141,2 
50,67,141,251,67,169,190,141 

1129 DAT05, 208, 141, 7, 208,169, 155, 141, 4, 208, 169,1 
87,141,6,208,173,16,208,41,243 

1130 DATA141, 16, 208, 173, 21, 208, 9, 12, 141, 21, 208,9 
6,238,5,208,238,7,208,206,4 

1131 DATA208,206,4,20B,206,4,20a,23S,6,208,23B,6 
,208,238,6,208, 173,6,208,201 

1132 DATA3, 176, 8, 173, 16, 208,9,8,141 ,16, 203,173,7 
,208,201,235,144,17,173,21,208 

i 1133 DATA41, 243, 141, 21, 208, 32, 12, 134, 169, 0,141, 7 
! 5, 3, 96, 173, 7, 20B, 201, 194,240 



<25> 

<94> 

<17> 

<1> 

<7> 

<35> 

<48> 

<77> 

<134> 

<Z41> 

<62> 

<225> 

<10> 

<91> 

<166> 

<247> 

<84> 

<137> 

<197> 

<130> 

<97> 

<107> 

<109> 

<US> 

<ill> 

<21> 

<50> 

<127> 

<9> 

<121> 

<30> 

<67> 

<51> 

<31> 

<190> 

<10O> 

< 176> 

<2A> 

<128> 

<179> 

<216> 

<74> 

<12S> 



Computronic 



Com 



m&* { 



eft 



1134 DATA12, 201, 200,240,8, 201, 207, 240,4,201, 215, 
208, 6, 239,250, 67,238, 251 ,67 

1135 DATA96, 173, Bl, 3, 240, 4, 206, 81,3,96, 173, A4, 3, 
201,3,144,23,201,6,144,32,169 

1136 DATAB,56, 237, 64, 3, 141, 81, 3, 173, 0,208,201, 72 
,144,16,76,177,134,141,81,3 

1137 DATA173,0,20B,201, 253, 176, 3,76, 157,134,96 



<207> 

<240> 

<249> 
<131> 



<74> 



113B X=PEEK(186):PRINT"DATAS{gP^C£jaK!" 

1 139 PRINT"<:0Ö«M2>PLEASECSe4CC>WAITCSe4C£JWHlLE<: 
SPACE. }I*M<S£4C£}SAVING. .." " <132> 

1140 SYS57S12 , 'TURBD",X:P0KE193,ösPOKE194,96sPOKE 
174,0:P0KE175,139:BYB629S7 <g 7 > 

ENDE DES LI ST INES 



Die Biene Maja 

An Waben sich laben 

Auch der Stachel der Biene ist gestärkt durch Vitamine! 

Durchs Fernsehen in aller Welt bekannt, summt Biene Maja jetzt auch über den Computer-Bildschirm. 
Der Erfolg scheint ihr auch hier sicher, wenn man das Spiel erst einmal gesehen hat 



Die liebe Maja hat diesmal die ehrenvolle 
Aufgabe, ein ganzes Bienenvolk zu futtern. 
Leider ist der Auftrag der kleinen Biene an- 
strengender, als es vielleicht klingen mag. 
Überall lauern Feinde! Zusätzlich läuft 
auch noch die Zeit gegen Sie. Damit Ihr 
Volk aber nicht verhungert, müssen Sie 
schon mal den Joystick dranklemmen. 

Mit dem Steuerhebel können Sie nun die 
Imme nach rechts oder links bewegen. Ma- 
jas Flughöhe verändern Sie durch schnelles 
Drücken des Feuerknopfes. Sie werden 
feststellen, daß es kein Kinderspiel ist, die 
Summse in der Luft zu halten. 



Ihr Ziel ist es, vom Bienenkorb aus zu der 
einzigen Blume mit Nektar zu gelangen. 
Leider steht diese Blume am Ende des 
Feldes. Auf dem langen Weg müssen Sie 
die Blumen und Vögel meiden. Jede Berüh- 
rung kostet Sie ein Leben. Für den Hin- 
und Rückweg bleiben Ihnen jeweils 5000 
Zeiteinheiten. Damit das fleißige Bienchen 
den Nektar auftanken kann, müssen Sie 
knapp über der Nektar-Blume eine Posi- 
tion halten. Auf die gleiche Art und Weise 
laden Sie die süße Fracht am Korb wieder 
ab, bis der Level steigt. 
Denken Sie an Ihren fetten Freund Willi, 
der einen riesigen Hunger hat! 





Seit seinem Fehltritt mit der Biene, ist er in der Nahrungsbeschaffung sehr vorsichtig 
geworden ! 

Compufronic 



Fünf vor Zwölf! Zeit zum Essen! 



Zum Laden; 

Vor dem Abtippen oder dem späteren Wie- 
dereinladen des Basiczeilenprogramms 
müssen Sie unbedingt folgende Zeile ein- 
geben: 

Poke 43,l:Poke 44\64:Poke 16384,0:New 
Nach dem Starten des Programms dauert 
es ca. 3 1/2 Minuten, bis der Computer die 
Daten in den Speicher übernommen hat. 
Nun fragt Sie Ihr 64er, ob abgespeichert 
werden soll: Tippen Sie T ein. Es wird ein 
reines Maschinenprogramm abgespei- 
chert, welches man später laden kann. 
Guten Flug! 



Das Listing 
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Com*** 



©flöte 



6«V 



(VI 




■ ;-64 LISTING + CHECKSUMMEN <C V1„0> 

1 REM *»*«**#*-*»******** 

2 REM #** BIENE KAJA *** 

3 REH *** WRITTEN BY *** 

4 REM ** HOLBER REITZ ** 

5 REM *** <C> 9. 1986 +** 

6 REM ***-##************** 

7 S1=54272:P0KE SI+4,0;PGKE Sl + 6 ,240: PDKE Sl+4,3 
3:PDKE SM 24,5: PDKE 53265,11 

8 POKE 532GB, B:PBKE 532B1,8:P0KE 64ä,0:DIM H(75> 

sFOR 1=0 TQ 9 

9 Hf4B+I)=I:H(65+I)=I+ie:NEXT 

10 FDP 1=2048 TO 7107: READ A* 

11 H-ASC<LEFT*<A*,1) ) 

12 L=ASC(RIGHT*(A*,I> > 

13 D=H<H)*16+H:L):S=S+DsP0KE I,D:POKE 54273, D 

14 A=ft + l;lF A<20 THEN NEXr=A=-l 

15 READ V:Z=Z+1:IF V=S THEN 17 

16 POKE 53265,27: POKE 54296,0: PRINT" tCt : fM>DATAF 
EHLER <-SPACE_l INtSP4CE> ZEILE CSPACE1 i ";99+Z-.END 

17 IF A<0 THEN 19 

18 S=0: A=0: NEXT 

19 FOKE 53265, 27: POKE 54296,0 

20 1HPUT"<-C LEAR D0UH2 > SPE ICHERNt SPAC£ > <J/N) CSjMC 
El: { SP4CF >":B* 

21 IF B*="J" THEN PRINT" t CLEAR y " : GOTO 24 

22 IF B$="N" THEN PRINT " {. CLEA R> " = GQTQ 29 

23 GOTO 20 

24 INPUT" I CLEAFt PO HW2 ? F I LENflME <L SPA C£J -. Z SPACE > " ; C 
SilNFUT-tC LE/lft DOHN2 RVSONJV f «l£SO£F} I SK tSP/JCEJ OR 
< $PACE «KSOWJTtßKSOFFJAPECSP^CEJ: tS££CE>":D* 

25 IF D*="D" THEN X=8: PRINT" iCLEAR} "sSOTa 2B 

26 IF D*="T" THEN X-l : PRINT" ZCLEAR? " i BDTO 28 

27 GOTO 24 

28 SYBC57B12)C*,X:P0KE 174,17B:PDKE 175,27:P0KE 
193 T 1:PQKE 194, 8: SYS 62957 

29 PRINT" ZC LEAR ÜÖHH2 SPACE?!*** i SPACE} Pl£.{\SEt$P 
4CE3WAIT{SP4CE3***":SY5 2085 

30 REM **-** MC-CODE **** 

100 DATA 00, IE, 03, C2, 07, 9E, 20, 28, 32, 30, 38, 35, 29, 
20,20,54,52,4F,4E,49, 1177 

101 DATA 43, 20, 56, 45, 52, 4C, 41, 47, 20, 00, 00, 00, 00, 
00, 00, 00,00,20, 53, E4, 923 

102 DATA A2,00,BD,7E,08,9P,3C,03,E8,E0,C0,D0,F5, 
A9,36,B5,01,ES,EA,EA, 2865 

103 DATA A9,0B,A2,D0,85,FB,86,FC,A5,2D,A6,2E,B5, 
FD,B6,FE,A0,00,F0,04, 2709 

104 DATA B1,FD,91,FB,A9,F2,A2,08,E4,FE,D0,02,C5, 
FD, F0, 13,^5^0,00,02, 3436 

105 DATA C6,FE,C6,FD,A5,FB,D0,02,C6,FC,C6,FB,4C, 
50,0B,A9,00,A2,20,85, 3088 

106 DATA 2D,86,2E,4C,3C,03,2B,9fi,03,C9,CF,D0,H, 
20,9A,03,C9,00,D0,04, 1788 

107 DATA A9,CF,D0,1C,AA,A9,00,4C,B3,03,C9,BF,D0, 
12,20,9A,03,C9,00,D0, 2377 

10B DATA 04,A9,BF,D0,07,AA,20,9A,03,4C,B3,03,2B, 
R5,03,A9,00,A2,D5,E4, 2120 

109 DATA FC,DB,02,C5,FB,D0,C3,A9,37,85,01,2e,59, 
A6,4C,BB,22,E8,A0,00, 2460 

110 DATA 91,2D,CB,CA,D0,FA,8B,98,38,65,2D,B5,2D, 
90,02,E6,2E,4C,6D,03, 2328 

111 DATA A0,0B,B1,FB,£6,FB,D0,02,E6,FC,6B,A0,00, 
91,2D,E6,2D,D0,02,E6, 2922 

112 DATA 2E,60,CF,2F,01,02,03,CF,09,1A,1B,1C,CF, 
17,04,05,06,0C,0D,0E, 9B3 

113 DATA 12, 13, 14, 15, 00, 00, 00, 1D, IE, IF, 22, 23, 26, 
22, 23, CF, 12, 07,08,09, 593 

114 DATA 0F, 10, 11, 16, 17, 18, 19, 00, 00, 00, tD, 00, 1D, 
24,25,27,24,25,CF,24, 628 

115 DATA 28, CF, 44, 14, 09, 0D, 05, 00, 3A, 00, BF, 03, 30, 
00, 00, 00, 0C, 05, 16,05, 706 

116 DATA 0C, 00, 3A, 00, 31,00, 00, 00, BD, 01, 0A, 01,27, 
13,00,3A,CF,10,14,0B, 511 

117 DATA 05, B0, 07, 01 , BD, 05, 00, 09, 13, 00, 0F, 16, 05, 
12,CF,0E,0E,05,03,14, 382 

118 DATA 01,12,00,BF,1B,A0,CF,B7,10,12,B5,13,13, 
00,06,09,12,05,00,14, 746 

119 DATA 0F, 00, 13, 14, 01, 12, 14, 00, 14, 08, 05, 00, 07, 
01,0D,05,CF,06,03,0F, 383 

120 DATA 0E,07,12,01,14,15,0C,01,14,09,0F,0E,0a, 
02,05,05,08,09,16,05, 20B 



<146> 

<191> 

<73> 

<176> 

<10> 

<151> 

<194> 

<120> 

<70> 

<171> 

<141> 

<151>' 

<184> 

<233> 

<70> 

<122> 
<239> 
<100> 
<20> 

<239> 
<32> 
<137> 
<14B> 



<173> 
<22B> 
<248> 
<164> 

<145> 

<93> 
<33> 

<214> 

<10B> 

<60> 

<244> 

<B7> 

<235> 

<58> 

<73> 

<70> 

<172> 

<62> 

<52> 

<151> 

<214> 

<6> 

<68> 

<16> 

<43> 

<177> 

<B9> 

<197> 



121 DATA 00,09,13,00,06,15,0C,0C,00,0F,ß6,00,0E., 
05, 03, 14, 01, 12, CF, 37, 423 

122 DATA 20,A3,FD,A9,7F,0D,0D,DC,A9,10,8D,I1,D0, 
A9,E0,85,02,A9,11,8D, 2524 

123 DATA 00, CC,A9, 00, 80,09,00^9,10,80,08,43^9, 
45, BD, BD, 43, A9, 00, BD, 1B97 

124 DATA ßB,CC,A9,B0,8D,4F,54,8D,0A,CC,A9,6D,8D, 
08, 53, ß9, 01 ,8D,00,CB, 2067 

125 DATA 8D,01,CB,A9,C3,B5,F8,A9,DB,B5,F9,A9,FB, 
BD,2E,53,A9,ßi,8D,i4, 28B6 

126 DATA CC.A9,00,BD,lE,CC,A9,00,8O,15,CC,eD,lF, 
CC, BD, 21, CC, BD, 22, CC, 2416 

127 DATA BD,2B,CC 1 8D,29,CC,8D,2A,CC,A9,FE,85,AD, 
A9,FF,B5,AF,A9,20,85, 2953 

128 DATA AE,85,B0,85,B2,B5,B4,B5,B6,85,BB,B5,BA, 
A9,64,B5,ei,A9,65,85, 3040 

129 DATA B3,A9,32,B5,B5,A9,33,85,B7,A9,AA,B5,B9, 
A9,04,B5,BB,A9,0i ,SD, 2709 

130 DATA 01,CC,BD,02,CC,8D,05,CC,A9,02,BD,ß3,CC, 
A9,00,BD,04,CC,A9,00, 210B 

131 DATA SD, 00, B0, BD, 02, 80, A9, 22, BD, 01, 80, 8D, 03, 
S0,A9,C3,8D,04,B0,A9, 2091 

132 DATA C2,BD,05,B0,A9,CD,BD,06,80,A9,3B,BD,07, 
B0,A9,30,BD,08,80,A9, 2281 

133 DATA 38,BD,0B,0B,A9,37,BD,09,0B,A9,30,BD F BA, 
0B,A9,34,BD,0B,0B,4C, 1428 

134 DATA 00,40,CF,0D,0D,09,01,01,2A,2B,2C,2D,2E, 
2F, 30, 41 ,42,43,44,45, 958 

135 DftTA 46,47,48,49,4A,4B,4C,4D,4E,4F,50,51,52, 
53,54,55,56,57,58,59, 1590 

136 DATA 5A,5B,5C,5D,5E,5F,60,61,62,63,64,65,66, 
67,6B,69,6A,6B,6C,6D, 1990 

137 DATA 6E,6F, 70, 71, 72, 73, 34, 35, BF, 03, 36,37,38, 
20, 20, BF, 07, 36, 20, 20, 1519 

13B DATA BF, 07,36, 20,20, 36, 36, 39, BF, 04, 36, 3F,3F, 
36, 36, 36, 3A, BF, 03, 36, 1324 

139 DATA 20, 20, BF, 03, 36, 3B, 36, 36, 36, 20, 20, BF, 04, 
36, 3C, 36, 36, 20, 20, BF, 1267 

140 DATA 07, 36, 20, 20, 3D, BF, 05, 36, 3E, BF, 0B, 20, 00, 
00,00,0B,0C,0F,01,0F, 786 

141 DATA 0C,ßB,CF,FF,CF,FF,CF,FF,CF,FF,CF,56,54, 
00,00,04, 28,00, FC, AB, 2912 

142 DATA 00, 3D, DD, 00, 0D, DD, 00, 03, DD, 00, SB, 3C, 00, 
2A,03,CF,28,54,B0,00, ÜB4 

143 DATA D4,00,00,FC,A0,00,3D,E9,00,0D,D9,00,03, 
DD,B0,0B,3C,00,2A,03, 14B5 

144 DATA CF,2n,15,00,2B,17,00,0A,3F,00,77,7C,00, 
77,70,00,77,C0,00,3C, 1251 

145 DATA 20,BB,C0,R8,CF,29,15,00,ß0,17,00,0A,3F, 
00,6B,7C,00,67,70,00, 1203 

146 DATA 77,C0,00,3C,20,00,C0,AB,CF,FF,CF,FF,CF, 
FF,CF,FF,CF,FF,CF,FF, 3535 

147 DATA CF,FF,CF,2C,BF,04,55,54,54,54,55,55,55, 
41, CF, 03, 40, 50, 54, 55, 20BB 

14B DATA 55,15, 15, BF, 06,55,00, 01, BF, 04, 55,41,54, 
50,40,00,80,50,54,54, 1233 

149 DATA BF, 06, 55, 54, CF, 04, 55, 55, 15, 55, 15, 15, 15, 
55,55,54,50,00,00,00, 1250 

150 DATA 15, 55, 55, 55, 15, CF, 03, 40,40, 40, 00, 00, 05, 
55,55,55,15,15,15,00, 1022 

151 DATA 45, 55, 55, BF, 03, 14, 00, 50, 54, 55, 05, 05, 15, 
54, BF, 04, 15, 55, 55, S4, 1237 

152 DATA 15,15,14,15,55,45,45,01,50,40,00,00,01, 
45, 55, 54, 00, 54, 55, BF, 1050 

153 DATA 04,15,00,50,54,55,15,15,14,14,00,15,53, 
BF, 03, 50, 51 ,00,40,50, 961 

154 DATA 54, 14, 14, 54, 50, BF, 06, 15, 54, BF, 03, 14, BF, 
03,15,55,55,50,54,54, 1437 

155 DATA 15,15,05,40,00,00,00,05,14,54,50,54,54, 
55, BF, 04, 15,00,00,00, 769 

156 DATA 40, 40, 40, 51, 51,05, 15, 15, BF, 04, 55, BF, 07, 
15,51,55,55,55,15,15, 127B 

157 DATA 04, 00, BF, 03, 55, BF, 03, 15, CF, 07, BF, 07, 15, 
00,15,55,54,40,00,00, 1105 

158 DATA 15,40, 54, 55, 15, 05, 05,15,55,15, 55,54, 50, 
54,15,15,05,54,54,14, 980 

159 DATA 05,15,55,55,45,00,05,BF,03,55,BF,0B,15, 
55, 54, 54, 00, 00, 00, BF, 1216 

160 DATA 07, FF, 00, 00,00,30, 30, 33, FF, Fr,00, 00, 03, 
03, 03, 33, FF, FF, 00, 00, 14B9 

161 DATA 00,3D,ßB,00,B0,ßF,BB,F4,B0,00,04,3C,CF, 
03,2B,6B,0A,02,00,03, 753 

162 DATA 00,00,00,2S,A2,AA,Aa,CB,BF,07,D7,02,8A, 
9A,BE,BF,00,BF,00,BE, 2201 

163 DATA 7E,40,92,96,BE,BE,FE,FE,BD,CF,09,02,02, 



<91> 

<120> 

<18> 

<183> ' 

<92> 

<199> 

<120> 

<125> 

<206> 

<254> 

<44> 

<22B> 

<154> 

<242> 

<123> 

<206> 

<217> 

<204> 

<0> 

<13B> 

<2B3> 

<211> 

<186> 

<72> 

<33> 

<27> 

<1B> 

<50> 

<212> 

<163> 

<245> 

<119> 

<230> 

<176> 

<133> 

<226> 

<236> 

<36> 

<55> 

<152> 

<6> 

<14> 



16 



Computronic 



CMÖf&**** 



05,2A,2A,AA,0A,AA,AA 

164 DATA AA, 55, BF, 06 

55,AA,AA,AA,00,00,80 

165 DATA 80, 50, AB, AS 
BE,FF,BF,03,FB,FF,BE 

166 DATA FB, FF, FF, BF 
FF,FF,BF,03,AA,55,2A 

167 DATA 2A,0A,BF,03 
C0,CF,BD, 15, 15,85,00 
16B DATA 01,00,05,05 
ES, 90, AB, A4, CF, 83, 40 

169 DATA 00,00,00,15 
00,03,95,D5,F1,FB,F0 

170 DfiTA F0,F3,FE,CF 
3F,03,00,0B,03,C3,FF 

171 DfiTA AF,EF,B0,CF 
08,00,FF,EC,F0,CF,08 

172 DfiTA 03, 02, 09, 25 
F0,FF,3F,03,CF,05,CB 

173 DfiTA F0,3C,FC,F0 
55, 55, 56. 89, 00, 00, Cß 

174 DATA 00, 03, BF, 0F 
0F,FB,EF,FE,EA,FF,FE 

175 DATA FB,3F,03,0B 
EE,FB,EB,FF,FC,F0,80 

176 DfiTA BF, 00, EC, FC 
8A,9A,BF,03,AA,6A,40 

177 DfiTA 92, 96, BF, 03 
BF,3B,IA,0F,0B,0B,00 

178 DATA C0,C0,C0„A4 
FB,EF,EC,BC,F8,F0,FB 

179 DATA FE,3B,8F,03 
FF,0F,0F,FB,FA,EF t AF 

180 DATA FC,F0,C0,00 
CF,FF,CF,FF,CF,FF,CF 

181 DATA 97,18,3C,3C 
7C,C6,FE,FC,3C,7E,66 

182 DATA 60,C6,C6,FC 
7E,7E,60,78,F8,C0,FC 

183 DATA FC,7E,7E,60 
Cc ^Cof Fe: .j 7C t üD T nö^6o 
1B4 DATA 7E,FC,CC,CC 
IE, 1E,0C,BC, 18,DB,FB 

185 DATA 79,66,6C,7B 
C0,FE,FE,66,7E,7E,6fc 

186 DATA BF, 03, CC, 66 
66,C6,C6,FO,7B,7C,7E 
1B7 DATA 66,7£,FC,C0 
0E,7C,7E,66,7E,FC,CC 
18B DATA CC,C6,3C,7E 
18, BF, 03, 30, BF, 03, 66 

189 DATA CC,CC ? FC,78 
66,CC,FC,FC,CC,C6,C6 

190 DATA 66, IC, 39, 6C 
FE,FE,06,0C,30,C0,FE 

191 DATfi FE,CF,5F,BC 
FE,7C,1B,7B,FB,18,18 

192 DATA 1B,3C,3C,7C 
06,1C,1C,06,FE,7C,0E 

193 DATA IE, 3E, 66, FF 
FE,7C,7C,FE,C8,FC,FE 

194 DATA C6,FE,7C,7E 
F£,C6,FE,7C,7C,FE,C6 

195 DATA FE, 7E, 06, FE 
7E,81,9D,A1,A1,9D,B1 

196 DATA 7E,CF,FF,CF 
FF,CF,FF,CF,F7,A9,09 

197 DATA BD, 86, 02, A9 
BD, 20, DB, A9 ,09, BD, 21 
19B DATA D0,A9,S0,8D 
BD,16,D0,A2,00,BD,00 

199 DATA 20,90,00,04 
1C,D0,A9,38,BD,01,D3 

200 DATA A9, 00,80,00 
25,»0,A9,07,BD,26,D0 

201 DATA A9,81 t BD,27 
06,D4,A9,0F,SD,1S,D4 

202 DATA A9, 00, 85. 03 
DH,A5,E3,C9,0B,F0,03 

203 DATA 4C,6A,40,FE 
A9,BB,8D f B4,D4,A9,ßA, 

204 DATA SD, 33, 04, A9, 
A9,B1,8D,84,D4,A9,2B, 

205 DATA 8D,0I,D4,AD, 
ß4,D4,A9,0A,BD,42,04, 



2392 <119> 

AA,55,AA,AA,AA,A0,AA,AA,AA, 

2610 <206> 

AA,FB,FB,FB,FF,FF,FB,FB,FB, 

4065 <181> 

04,FB,BF,00,FF,FA,FE,FE,FA, 

3662 <228> 

AA, 55, AB, AB, A0, 00, 00, FF, FF, 

1966 <99> 

05,5A,6A,AA,AA,00,BB,ß0,15, 

1400 <119> 

05,CF,05,6A,5A,B5,05,84,0B, 

1534 <240> 

03,3F,FB,AF,BB,3F,EE,FB,FA, 

2944 <15> 

ßB,0F,BF,EE,FA,AF,EC,F0,8B, 

268B <122> 

00, 03, 3F, FC, F0, 60, 58, 56, 80, 

1B44 <15i> 

15, 15, 15, 25, 0B, 08, 30, FF, 55, 

1B72 - ^36> 

0F,3C,3F,FB,F0,C0, 00,00,88, 

2356 <121> 

FF,EF,AF,EF,FF,FF,FF,BF,FE, 

3730 <160> 

F0,CF,43,BF,05,02,01 ,00,02, 

2220 <72> 

AA,A9,BF,05,88,40,CF,05,03, 

1547 <59> 

FC,F0,F3,F3,FE,FE,FE,3C,3C, 

4245 <10B> 

08,0B,00,B3,F3,B3,BF,00,FF, 

257B <1E59^ 

F0,C0,CF,05,BF,B7,0F,CF,FF, 

3S96 <245> 

6C,7E,FE,C6,C6,7C,7E„66,7C, 

2771 <131> 

7B,7C,7E,&6,66,C6,C6,FC,F8, 

3374 <96> 

78,FB,C0,C0,C0,3C,7E,66,68, 

3016 <100> 

CC,3C,3C,1B,1B,30,30„7B,7B, 

2066 <220> 

70 , FS , CC , CC , C6 , BF , 03 , 60 , C0, 

3046 <13> 

76,7E,6E,BF,03,CC,3C,7E,66, 

2660 <253> 

C0,C0,3C,7F,66,C6,C6,FE,7C, 

3066 <235> 

CS , FC , 7E , 06 , FC , 78 , 7E , 7E , 18 , 

2374 <233> 

BF,83,66,CC,CC,78,3B,BF,£!3, 

3256 <190> 

BF, 03, C6,6C;3C, 18,30,30,68, 

2090 <224> 

1B,3B,CF,44,7C,FE,BF,03,C6, 

2503 <221> 

FE,B&,0C,3B S £0,FE,FE,7C,FE, 

215B <26> 

FF, 86, 06, FE „FE, CB, FC, FE, 06, 

3382 <25> 

FE,0C,BF,04,lB,7C,FE t C6,7C, 

3293 <245> 

7C,00,S0,18,1B,00,1B,1B,08, 

1BBB <124> 

FF,CF,FF,CF f 1F,BF,07,FF,CF, 

3759 <204> 

00,BD,10,D0,20,44,E5,A9,B9, 

2051 <150> 

91,02,A9,1D,BD,1S,D0,A9,1B, 

2279 <24> 

E8,D0,F7,A9,01,BD,15,D0,SD, 

2372 <147> 

D0,A9,A2,BD,Fa,07,A9,00,BD, 

2363 <S4> 

DS,A9,00,8D t 84,D4,A9,2F,8D, 

2220 <122> 

E6,03,A6,B2,CA,DS,FD,EE,22, 

2472 <133> 

00,D0„AD,B0,D0,C9,66 ( DB, IE, 

2319 <!8B> 

0B, BD, 34, 04, A9, 09,80,05,04, 

1973 <43> 

00, DB, C9, DE, DB, IE, A9, 00, BD, 

2312 <117> 



206 DATA A9,0B 

04,D4,A9,2B,BD 

207 DATA AD, 00 
FB,07,AD,FB,07 
20B DATA D0,85 



03, 4C, 66, 40 

209 DATA C9 
D9,9D,08,DA 

210 DATA EB 
8D,10,D0,A9 

211 DATA A9 
15, 03, A9, 03 

212 DATA A9 
43, AD, 19, D0 

213 DATA 30 
FA,B0,1B,A9 

214 DATA D0 
FA,0D,12,D0 

215 DATA A9 
1 1,D0,A5,FB 

216 DATA AD 
C9,04,D0,22 

217 DATA 01 
17, SD, 00, CC 

218 DATA 18 
43,C9,B0,D0 

219 DATA 43 
A9, 03, BD, 15 

220 DATA D0 
BD,02,D0,A9 

221 DATA D0 
F9, 07, AD, FS 

222 DATA D0 
00,DC,C9,6F 

223 DATA BC 
A9,0F,8D,15 

224 DATA D0 
SD T 10,D0,A9 

225 DATA D0 
BD , 03, D0, BD 

226 DATfi 07 
A9, 01, BD, 01 

227 DATfi BD 
BD, 00, 21, 9D 
22B DATA E0 
5B,AD,1F,D8 

229 DATfi A2 
BD, 42, 04, SD 

230 DATA 0B,3D 
C0,07,EB,E0,28 

231 DATA A9 5 G2 
D0,BD,2B,D0,SD 

232 DATA BD,2A 
70,DB,EB,E0,58 

233 DATA A9,01 
E0,1E,D0,F6,A9 

234 DATA CS, DB 
12,D8,C9,B0,D0 

235 DATA 10, SD 
43, A9, 05, BD, 24 

236 DATA 00, A2 
F5, AD, 20, 43, 18 

237 DATA 90,03 
28, 90, 03, EE, 24 

238 DATA 23,43 
B3,4C,0B,43,A9 

239 DATA 02, A6 
FF,CF,FF,CF,FF 

240 DATA CF,AD 
05, 12, 13, 09, 0F 

241 DATA 3B,03 
BF, 0E, 09, 03, 88 

242 DATA 12,0C 
CF,41 ,17,12,09 

243 DATA S5,0E 
B9,14,1A,CF,63 

244 DATA 05,01 
05, 12,27, 13, CF 

245 DATA CF S 36 
00,02, 12, BF, 14 

246 DATA 12,27 
14, £53,05,00,02 

247 DATA 14,08 



ZZ 



,SD,43 

,01, D4 
,D0,C9 
,C9,A4 
,A9,A2 
,00,D0 
„F0,03 
,00, DB 
,F4,A9 
,35, FS 
,S5,FA 
,12,D0 
T BD,11 
,19,D0 
,AD,0D 
,8D,1S 
,08, BD 
,HC,FE 
,8D,1B 
,12,D0 
,CC,C9 
,00, BD 
,CE,B0 
,0B,43 
,28,90 
,AD,BD 
,4A,D0 
,8D,1C 
,05, BD 
,8D,0I 
,03, D0 
,C9,A4 
,A9,A2 
,03,4C 
,20,44 
, BD , 1 C 
,64, BD 
,BD,B2 
, 30 , BD 
,DB,BD 
,A9,A2 
,A9,00 
,CC,BD 
,07, ES 
,D0,F5 
,1F,D0 
,BD,00 
,04,A9 
,43,04 
,DB,F5 
, BD , 25 
, 29,00 
,D0,A9 
,D0,F6 
,BD,22 
,02, BD 
,A9,0F 
,F9,A9 
,20,43 
,43,A0 
,00, BD 
,69,28 
,EE,21 
,43, BD 
,C8,C0 
, DE , B5 
,02, CA 
,CF,FF 
,03, 0F 
,0E,CF 
,0F,10 
,16,05 
,01,07 
,14,14 
,00,00 
,09,04 
,S0,E0 
,2B,60 
,07,12 
,08,05 
,13,CF 
, 12, BF 
,05,12 



04,A9,09,BD,05,D4,A9,S1,BD, 

2146 <235> 

0B,D0,05,A9„01,8D,10,DB,EE, 

2616 <23> 

BD,FB 5 97,AD,10,D0,C9,01,F0, 

2405 < 165> 

4C t 66,40,A2,00,A9,0B,9D,00, 

2222 <124> 

7F,8D,0D,DC,A9,02,BD,00,D0, 

2B87 <171> 

7B,A9,3C,SD,l4 f 03,fi9,41 1 ,SD, 

2253 <5> 

DS,A9,B1,8D,1A,D0,53,4C,B0, 

2118 <13B> 

DC,5B,4C,3i,EA,AD,12,D0,C5, 

231B <110> 

16,D0,AD,00,CC,8D,11,D0,A5, 

2799 <5> 

D0,A9,18,BD T 16,D0,A9,1B,8D, 

2477 <27> 

00,D0,2C,EE,01 ,CC,AD,01 ,CC, 

2417 <89> 

CC,AD,00,CC,C9,0F,Dß,13,A9, 

2220 <68> 

03,EE.0D,43,8D,0a,43,AD,0B, 

1BB1 <82> 

05,A9,01,BD,09,CC,BF t 04,EA, 

2219 <136> 

2B,D0,A9,lE,BD,00,D0 t A9,23, 

2245 <46> 

A9,01 ,8D,28,D0,EE,F8,07,EE, 

2899 <29> 

BD,FB,07,A9,A0,8D,F9 T 07,AD, 

2695 <14> 

E5,A9,B6,8D,20,D0,SD,21 ,D0, 

2432 <226> 

01,D0,A9,96,BD,00,D0,A9,0E, 

23B7 <46> 

04,D0,A9,40,BD,06,D0,A9,E0, 

2606 , <226> 

BD,F9,ß7,BD,FA,B7,BD,FB,07, 

2425 <251> 

03,CC,A9,FF,8D,01,D4,A2,00, 

2365 <216> 

20, 00, 4F,A9, 36, 85,01,20, 00, 

2089 <178> 

20,9D,00,04,E8,D0,F7,A9,0A, " 

1986 <73> 

SD, 34, 04, A2, 00, BD, 50, 21, 9D, 

2189 <233> 

D0,A9,07,BD,26,D0,B1,8D,27, 

22BB <36> 

02,BD,23,D0,A2,00,A9,0B,9D, 

2771 <185> 

D0,A2,00,A9,01,9D,CB,DB,Ea, 

2713 <224> 

8Ö,06,D4,4C,0B,53,CF,0D,AD, 

2567 <219> 

A9 I 45,BD,21,43,A9,1B,8D,23, 

1749 <129> 

00,21, 9D,0B, 05, E8,E0,2B,D0, 

1936 <142> 

43, 8D, 20, 43, AD, 23, 43, 1B, 69, 

179B <130> 

12,D0,D2,AD,09,CC,C9,01,FB, 

2428 <117> 

D0,FD,EE,22,D0,4C,59,43,CF, 

3393 <70> 

0D,0D,0F,04,8F,12,05,00,16, 

790 <5S> 

19,12,09,07,03,14,00,14,12, 

286 <66> 

CF, 40, 38, 08, 00, 31, 39, 38, 36, 

946 <151> 

BS, 0F,g)C, 07, 05, 12, 00, 12,85, 

481 <19B> 

14,88,05,00,02, 12, SF, 14,08, 

529 <243> 

01,30,08,09,83,00,14,08,05, 

424 <B7> 

62, 13,0F, 15, 0E, 04, 13,00,00, 

541 <122> 

27, 13,CF,60, 14,08,09, 13,08, 



Computronic 
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Com 



modot* 



S* 



ftrt 



10, 12, BF, 07, 12, 01, BD, 556 

249 DATA OB, 07, 13,00, 17, 12,09. 14, 14. 05, 0E, 00, 09, 

0E,CF,62,13,05,10,14, 525 

249 DATA 05 , OD, 02,05 , 12,00,31 ,39, 3B, 36, CF ,67, 10, 
12,05,13,13,00,06,09, 661 

250 DATA 12,05,00,14,0F,00,13,14,01,12,14,CF,0B, 
BF, 07, FF, FB, BF, 06, FF, 1510 

251 DATA CF+FF,CF,FF,CF,FF,A9,BB,85,FC F A9,A0,85, 
FD, A2,00,A0,00,A9, 20, 3178 

252 DATA 91 ,FC,CB,D0,F8,E6,FD,EB,EB, 16,DB,F0,A2, 
0B,A9,29,9D,00,B4,E8, 3406 

253 DATA D0,FA, A2,80, A9,2A,9D,00,B3,E8,D0,FA, A9, 
00,B5,02,A2,00,E6,02 f 2555 

254 DATA A5,02,C9,03 ,D0, 09, A9,2B,9D,00, B3 , A9.00, 
85,02„EB,D0,EC,A9,00, 2285 

255 DATA SS ,02 ,85,B3 ,A9 ,0A,85,FA , AD,04,DC , 29, B4, 
1B,69,B5,B5,FF,A5,FA, 2212 

256 DATA 1B,65 , FF, 85, FA , 18, 69,01 , BS, FC, AD ,04, DC, 
29,06, 18, 69,AB,B5,FB, 2403 

257 DATA 18, 69, 03, 85, FD, A2, 00, AB, 00, BD, OB, 23, 91 , 
FA,Ea,CS,C0,04,D0,F5, 2551 

258 DATA E6,FB,E0,0C,D0,ED, A0,00, A9,6D,91 ,FC,E6, 
FD,A5,FD,C9,B4,D0,F4, 3731 

259 DATA E6,03,A5,03,C9,01 ,D0,05,A9,0B,8D,7C,4F, 
A5,03,C9,02,D0,05,A9, 2093 

260 DATA 17,8D,7C,4F,A5,03,C9,03,D0,09,A9,2B,8D, 
7C,4F,A9,0B,95,03,E6, 2047 

261 DATA B2,A5,02,C9,IE,F0,03,4C,52,4F,A2,00,A9, 
0D,9D,CB,DB,9D,BE,D9, 2361 

262 DATA 9D,48,DA ,EB,D0,F4 ,BF,0B,EA, A9, 36, 85, 01 , 
20,BB,56,60,CF,0F,78, 2480 

263 DATA A9,28,BD , 14,03, A9 , 50, 8D, 15,03, A9,00 ,BD, 
12,D0,A9,1B,BD,11,D0, 1885 

264 DATA A9,B1 ,8D, 1A,D0,A9,5A,85,FA, A9,DA,85,FB, 
A9, 00, 85, FC, 58, 60, AD, 2B69 

265 DATA 19,D0,8D, 19,D0,3B,07,AD,BD F DC,53,4C,31 , 
EA,A5,FA,BD,12,D0,A9, 2466 

266 DATA 00, BD, 20, D0, SD, 21 ,D0,A9, 1D,8D, 18, DB, A9, 
1B,SD,16,D0,A9,26,8D, 2246 

267 DATA 2F,50,4C ,BC,FE ,A5,FB , BD, 12, D0 , A9,06,8D , 
20,DB,SD,21,D0,A9,1D, 2564 

268 DATA BD, 1B,D0,AD,00,CC,8D, 16,D0,A9,46,8D,2F, 
50,4C,BC,FE,A5,FC,8D, 2704 

269 DATA 12, D0,A9,00,aD,20,D0 ,8D,21 ,D0,A9,08,BD , 
16,D0,A9,1E,SD,18,D0, 2278 

270 DATA A9,07,8D,2F,50,AD,0A,CC,C9,00,F0,0D,AD, 
0A,CC,C9, 01, 00,06,20, 2120 

271 DATA 00,54,4C,BC,FE,AD,00,DC,C9,7B,D0,0F,A9, 
01,SD,B0,CB,A9,A0,SD, 2526 

272 DATA F8, 07, A9,0S , BD, 01 ,CC , AD, 00, DC , C9, 77, D0, 
0F,A9, 01 ,8D,01,CB,A9, 2390 

273 DATA A2, BD, FS, 07, A9,01 ,3D,01 , CC,AD , B2,CC,C9„ 
B1,D0,58,AD T 0B,DC,C9, 2545 

274 DATA 7F, DB, 05, A9 ,00, 8D,02,CC, AD, 00, DC, C9,6F, 
DS5,BB,A9,B0,BD,00,CB, 2293 

275 DATA BD ,01 ,CB,4C , 12,51 ,AD ,00,DC,C9 ,6B,D0,3B, 
A9,Bli8D,00,CB,4C,12, 2045 

276 DATA 51 , AD, 00, DC , C9, 67„D0 ,24, A9,öl ,BD,0i ,C9 , 
AD, 01, DB, E9, BS, 80,01, 2299 

277 DATA DO, A9, 00, 80,0^,04^9^88, SD, 05, D4,A9, 81 , 
8D,04,D4 T EE,F8,07,A9, 2714 

278 DATA 00,8D,02,CC,AD,02,CC,C9,00,DB,32,AD f 00, 
DC,C9,7F,D0 T ßB,A9,0B, 2294 

279 DATA BD .00 ,CB,9D,01 ,CB,4C ,65,51 ,AD ,00, DC,C9, 
7B T D0,08,A9,01,BD,00, 2191 

280 DATA CB,4C,65,51,AD,0B,DC,C9,77,Dß,0B,A9,01, 
SD,01,CB,A9,01,BD,02, 2221 

281 DATA CC,AD,01 T CC,C9,00,DB,0C,AD,F8,07,C9,A1, 
DB, 05, A9, AB, SD, FS, 07, 2731 

2B2 DATA AD ,01 , CC,C9,01 , D0,0C,AD,FB,07»C9, A4, D0, 
E5,A9,A2,8D,F8,B7,EE, 2771 

283 DATA 03 t CC, AD,03,CC,C9,03,DB ,03, A9, 00, BD, 03, 
CC,EE,01,D0,EE,05,CC, 2418 

284 DATA AD,05,CC,C9,02,D0,45,A9,00,SD,05,CC,AD, 
ßl,CC,C9,00,D0,19,AD, 2366 

285 DATA 00,CB,C9,01 ,D0, 12, EE, 00, CC, AD, 00, CC,C9, 
18, DB, 08, A9, 10, BD, 00, 2217 

286 DATA CC,CE ,2E, 53, AD, 01 , CB,C9 ,01 ,D0, 19 ,AD,01 , 
CC,C9,01,D0,12,CE,00, 2363 

287 DATA CC,AD,00, CC,C9 ,0F, DO, OB ,A9, 17, 8D ,B0,CC, 
EE,2E,53,AD,1F,D0,C9, 2530 

288 DATA 01 ,D0, 19, A9, 00,80, 04,D4,A9, 05, 80,01 ,D4, 
A9,09,BD,05,D4,A9,81, 2122 

289 DATA 8D,04 ,D4 , A9,01 ,8D ,0A,CC, A2 , 7A,FE f 00,07, 
BD,B0,B7,C9,3A,D0,0A, 2100 



18 



<45> 

<202> 

<118> 

<1S9> 

<99> 

<119> 

<75> 

<150> 

<37> 

<36> 

<62> ' 

<49> 

<141> 

<4> 

<139> 

<40> 

<97> 

<8B> 

<233> 

<189> 

<116> 

<27> 

<207> 

<i35> 

<164> 

<124> 

<1B3> 

<14B> 

<18B> 

<112> 

<I35> 

<247> 

<249> 

<215> 

<133> 

<33> 

<255> 

<227> 

<125> 

<139> 

<126> 

<231> 

<51> 



290 DATA A9,30,9D,00,07,CA,E0,9E,DE,EC,AD,77,07, 
C9,35,D0,0A,A9,01,8D, 2491 

291 DATA 0A,CC,A9,30,8D,77,07,AD,2E,53,C9,E1,D0, 
0C,AD,01,D0,C9,6E,D0, 2547 

292 DATA 05 , A9 ,01 ,SD , 15 ,CC,AD , 14 ,CC,C9 ,01 ,DB,60, 
AD,15,CC,C9,01,D0,59, 2341 

293 DATA EE, 16,CC,AD, 16,CC,C9,04,D0,4F,A9,00,SD, 
16,CC,A9,01,BD,1E,CC, 2436 

294 DATA A9,00,8D, 1F,CC,E6,FB,A9,0S,8D»0B,D4,A9, 

09,BD,0C,D4,A9,0A,8D, 2418 

295 DATA 0D,D4 , A9,64,8D, 07, D4,8D,0B, D4,A9,21 ,8D, 

0B,D4,A0,00,A9,02,91, 2257 

296 DATA F8, A5,F8,C9,E4,D0, 1 1 ,A9,B0,8D, 14,CC,A2, 
00,A9,30,9D,77,07,EB, 2743 

297 DATA E0,04 ,O0 T F8, A9,00, BD, 15 F CC,20,00,57,4C, 
BC T FE,00,BD,i5,CC,20, 2254 

298 DATA 00,57 ,4C, BC,FE ,BC ,FE, BD, 14 ,CC, AB, 00 , A9, 
02,91 ,FG,A5, FS, C9,E4, 2978 

299 DATA D0,05,A9 ,00, SD, 13 ,CC,4C,BC,FE, F8,4C,BC, 
FE,CF,20,AD,12,D0,C9, 2B69 

300 DATA 00,D0,F9,A9,00,8D,20,53,A9,A5,8D,21,53, 

A9,CB,8D,23,53,A9,04, 2274 

301 DATA BD,24,53,A0,00,A2,00,AD,00,A5,9D,CB,04, 
E8,EE,20,53,EB,2B,D0, 2338 

302 DATA F2,A9,00,8D,20,53,EE,21,53,AD,23,53,18, 
69, 28, 90, 03, EE, 24, 53, 1985 

303 DATA BD,23,S3,CB,C0,10,D0,D5,A9,36,85,01,AD, 
28,CC,C9,01,F0,03,4C, 2383 

304 DATA 00,53,A9,D2,B5,02,A6,02,CA,D0,FD T EE,22, 
D0,4C,5A,53,CF,9A,20, 2550 

305 DATA 00,57,AD,0B,CC,C9,00,D0,24,EE,01,D0,AD, 
01,D0,C9,C8,F0,01,60, 24B7 

306 DATA A9,00,BD,04,D4,A9,02,8D,01,D4,A9,09,BD, 
05,D4,A9,B1,BD,04,D4, 2242 

307 DATA A9,01,8D,0B,CC,AD,0B,CC,C9,ßl,D0,12 t E6, 
B2,A5,02,C9,37,F0,ßi, 223B 

308 DATA 60,A9,00,B5,02,A9,02,BD,0B,CC,AD,0B,CC, 
C9, 02, DB, 13, AD, 00, 23, 1953 

309 DATA BD,15,DB,EE,4F,54,A9,64,8D,01,D0,A9,03, 
SD,0B,CC,AD,0B,CC,C9, 2507 

310 DATA 03,F0,03,4C,i2,55,AD,4F,54,C9,01,D0,20, 
CE,04,D0,CE,06,D0,AD, 2214 

311 DATA 04,DB,C9,20,Dß,I3 t A9,00,8D,0B,CC,8D,BA, 
CC,AD,1F,D0,8D,1F,DB, 2344 

312 DATA A9,FF,BD,01,D4,AD,4F,54,C9,02,D0,1D,CE, 
06,D0,AD,06,D0,C9,20, 2594 

313 DATA D0,13,A9,00,8D,0B,CC,8D,0A,CC,AD,1F,DB, 
BD,1F,D0,A9,FF,8D,01, 2465 

314 DATA D4,AD,4F,54,C9,03,D0,1B,A9,00,BD,0B,CC, 
8D,0A,CC,AD,1F,D0,BD, 2417 

315 DATA 1F, DO, A9, FF, 80,01,04,09,33,80, 93, 07, AD, 
4F t 54,C9,B4,F0,03,4C, 2389 

316 DATA 12,55,A2,00,BD,2a g 21,9D,70 5 07,EB,E0,28, 
00^5^2,00,80,78,21, 2256 

317 DATA 9D,C0,07,E8,E0,28,DB,F5,A2,0B,A9,08,9D, 
C0,DB,9D,70,DB,E8,EB, 3156 

318 DATA 28,D0,F3,A9,Ca,8D,01 a DB,A9,04,BD,0B,CC, 
AD,SB,CC,C9 B 04,D0,0ft, 255® 

319 DATA AD,00,DC,29,10„D8?,03,4C,0B,22 5 AD,2B,CC, 
C9,01,D0,31,A2,00,A9, 1978 

320 DATA 0B,9D,C0,DB,BD,AB,21,9D,C0,B7,EB,EB,2B, 
DB,F0,EE,29,CC,AD,29, 2955 

321 DATA CC,C9 T 00,D0,15,EE,2A,CC,AD,2A,CC,C9,03, 
D0,0B,A9,00,BD,29,CC, 2515 

322 DATA BD,2A,CC,4C,0B,22,60,CF,A3,A9,0B,B5,FA, 
A9,A6,S5,FB,A2,00,A0, 2556 

323 DATA 00, BD, 3E, 23, 91 ,FA,E8,Ca,C0,BA,D0 ( F5,E6, 
FB,E0,5A,D0,ED,A9,01 , 317B 

324 DATA B5,FA,A9,B6,85,FC,A9,AF,B5,FB,85,FD,A2, 
00,A0,00,A9,30,91,FA, 2991 

325 DATA 91 ,FC,E6,FB,E6 ,FD,EB,EB,05,D0,EF, A9,F0, 
85,FA,A9,A9,B5,FB,A9, 3952 

326 DATA Fl ,B5,FC,A9,AC,B5,FD,A2,0fl,Aß,00,BD,2B t 
23,91,FA,EB,C8,C0,B4, 2965 

327 DATA DB T F5,E6,FB,E0,0C,D0,ED,A0,00,A9,6D,91 , 
FC,E6,FD,A5,FD,C9,B4, 3732 

32B DATA D0,F4 ,A9, 31 ,BD,F1 , A9,A9 ,32,8D,F2,A9, AD, 
FE,A7,85,AE,AD,FF,A7, 3488 

329 DATA 85, B0 ,AD ,64,AE ,85,B2,AD ,65, AE„85,B4 , AD, 
32,AA,B5,B6,AD,33,AA, 2930 

330 DATA 85,Ba,AD,AA,B0,85,BA,60,CF,60,AD,2E,53, 
C9,FA,D0,0C,AD,01,D0, 2909 

331 DATA C9,6E,D0,05,A9,01,8D,1F,CC,AD,1E,CC,C9, 
01,D0,57,AD,1F,CC,C9, 2583 

332 DATA 0t ,D0,50,EE,20,CC,AD,20,CC,C9,04,D0,46, 



<134> 

<116> 

<160> 

<74> 

<52> 

<3> 

<162> 

<177> 

<187> 

<147> 

<110> 

<70> 

<45> 

<155> 

<2B5> 

<31> 

<1S8> 

<32> 

<77> 

<1I4> 

<254> 

<115> 

<97> 

<133> 

<1B6> 

<134> 

<218> 

<177> 

<59> 

<46> 

<130> 

<113> 

<173> 

<0> 

<5S> 

<244> 

<122> 

<19> 

<163> 

<211> 

<163> 

<39> 



Computronic 



A9,00,BD, 

333 DATA 
A9,09,BD, 

334 DATA 
BD,0B,D4, 

335 DATA 
C9,D0,05, 

336 DATA 
E£,24,CC, 

337 DATA 
9D,7C,DB, 
33B DATA 
BD, BD, 57, 

339 DATA 
A9,30,9D, 

340 DATA 
AD,22,CC, 
34 i DATA 
07,AD,F9, 
342 DATA 
23, CG, AD, 



20, CC 
BD, 14 
0C,D4 
8D,0D 
AB, 00 
91, FS 
A9,00 
CC,C6 
AD, 24 
04, DO 
EB,E0 
F5,EE 
AD, 21 
IC, DB 
77,07 
04, D0 
C9,03 
A9,00 
07, C9 
0B,A9 
23, CC 



,A9,01 

,CC,A9 

,A9,0A 

,D4,A9 

,A9,01 

,A?,00 

,BD,1E 

>,F8,AD 

,CC,C9 

24, A9 

0B,D0 

8D,57 

,CC,C9, 

,1B,EE, 

,ES,E0 

,F8,A9 

,1)0,20 

,8D,22 

,A4,D0 

A2,BD 

,C5,BB 



, 2371 
',00,8D, 
I, 2155 
,14, BD, 
, 2172 
!,BD,1F, 
■-, 27B1 
,4F,54, 
, 2B23 
,00, BD, 
, 2505 
,AD,8D, 
, 300B 
:,86,07, 
I, 2307 
,00, BD, 
U 2725 
CC,EE, 
, 3035 
,F9,07, 
2B09 



15,CC,A9,00,SD,0B,D4, 
07,D4,BD,0B,D4,A9,21, 
CC,EE,21 ,CC,A5,F8,C9, 
C9,04,D0,03,4C,A6,57, 
24,CC,A2,80,AD,A2,23, 
57,C9,AB,D0,05,«9,A2, 
A9,0O,BD,21,CC,A2,00, 
23,CC,C6,BB,EE,22,CC, 
F9,07,EE,FA,07,EE,FB, 
BD,FA,07,8D,FB,07,EE, 



^W 



<202> 
<125> 
<166> 
<241> 
<71> 
<86> 
<16> 
<120> 
<22> 
<69> 
'<8B> 



343 DATA F0,01,60,A9 
00,A7,CA,BD,00,A7,B5 

344 DATA AE,A9,2E,9D 
00,A7,CA,BD,00,A7,85 

345 DATA B0,A9,2F,9D 
00,AE,CA,BD,00,AE,B5 

346 DATA B2,A9,2C,9D 
00,AE,CA,BD,00,AE,B5 

347 DATA B4,A9,2D,9D 
00,AA,CA,BD,00,AA,B5 

348 DATA B6,A9,2E,9D 
00,AA,CA,BD,00,AA,B5 

349 DATA BB,A9,2F,9D 
00,B0,CA,BD,00,B0,B5 

350 DATA BA,A9,2C,9D 
1B,05,A9,61,8D,01,D0 

351 DATA AD, 86, 07, C9 
01,BD,0A,CC,BD,2B,CC 

352 DATA 60, CF, 05, FF 
FF, FF, FF, FF, FF, FF, FF 

ENDE DES LISTINGS 



,00,8D,23,CC,A6,AD,A5,AE,9D, 

, 2579 <126> 

,00,A7,C6,AD,A6,AF,A5,B0,9D, 

, 2781 <79> 

,00,A7,C6,AF,A6,B1 ,A5,B2,9D T 

, 2804 <209> 

,00,AE,C6,B1,A6,B3,A5,B4,9D, 

, 2816 <30> 

,00,AE,C6,B3,A6,B5,A5,B6,9D, 

, 2817 <139> 

,00,AA,C6,B5,A6,B7,A5,BB,9D, 

, 2B22 <2> 

,00,AA,C6,B7,A6,B9,A5,BA,9D, 

, 2843 <33> 

, 00,Bß,C6,B9,AD,01 ,D0,C9,61 , 

, 2432 <79> 

,35,D0,0D,A9,FF,8D,0B,CC,A9, 

, 2479 <34> 

,FF, FF, FF, FF, FF, FF, FF, FF, FF, 

, 4643 <199> 



Titan 

VC~20+3k Speichererweiterung 




Wir wollen unseren VC-20-Usem ein echtes 
Erlebnis bieten: ein Weltraum-Erlebnis! Mit 
dem Programm „Titan" können Sie endlich 
einmal bedenkenlos mit Space-Shuttle in 
den Weltraum tigern. 

Fremde Mächte haben wieder Unfug im 
Sinn! Natürlich sind Sie bemüht, den Böse- 
wichten einen Strich durch die Rechnung 
zu machen. Dazu sind Sie mit Ihrem Shutt- 
le in den großen dunklen Raum geflogen, 
um in der Nähe des Saturns die entspre- 



chenden Maßnahmen zu treffen. Pendeln 
Sie zwischen Bodenstation und Shuttle hin 
und her, und sammeln Sie die erforderli- 
chen Energieträger im Weltraum ein. Aber 
zack, zack, denn die Zeit ist begrenzt. 
Ladehitmeise für Kassette: 
Den l.Teil mit SAVE „TITAN",1 abspei- 
chern. Den 2.Teü mit SAVE „TITAN 2",1 
abspeichern. Beim Nachladen des 2Teils 
ist auf dem Bildschirm ein Zeichenwirr- 
warr zu erkennen, ist aber völlig normal. 



Den 1 Teil laden und mit RUN starten. Der 
Rest wird automatisch nachgeladen. 
Ladehinweise für Diskette: 

Den I.Teil mit SAVE „TITAN",8 abspei- 
chern. Den 2.Teil mit SAVE „TITAN 2",8 
abspeichern. Beim Nachladen des 2.Teils 
ist auf dem Bildschirm ein Zeichenwirr- 
warr zu erkennen, ist aber völlig normal. 
Den 1 Teil laden und mit RUN starten. Der 
Rest wird automatisch nachgeladen. 




VC20 LISTING + CHECKSUMMEN (V VI.0) 

1 REM**************** <12B> 

2 REM*#(C> 1987 BY #* <245> 

3 REM** THOMAS ** <11B> 

4 REM«* RGEDERN ** <142> 

5 REM**************** <132> 

6 CLRiA=36B77:B=36S65tP0KEA+2,13-.P0KEA+l,15 <149> 

8 PRlUT'i. CLEAR HHJTE1 "TAB<2463 "EINEN{ SP4CO MOMEN 

T "CHR*(B) <121> 

9 FORXi=716BT07647:READC:PÜKEXl ,C:NEXT <92> 

10 DATA0, 0,0, 0,16, 0,0,0 <81> 

11 DATA0,0,0, 16, 16,0,0,0 <231> 

12 DATA12, 12,35,31,3, 14, B,B <156> 

13 DATA48,4B,196,248,192,112,16,16 <36> 

14 DATA42, 127,42,8,62, 127, 127,62 <113> 

15 DATA0, 3, 247, 239, 47, 31, 31, 31 <231> 

16 DATA223„227,252,31,1,6,3,0 <77> 

17 DATA0,192,239,247,245,24B,24B,24B <74> 
1B DATA25l,19?,62,24B, 129,96,192,0 <192> 

19 DATA0,0,7,15,30,2B,2S,14 <192> 

20 DATAß,0,0 s 0, 0,0,8,0 <235> 

21 DATA15,3,0,0,0,0,0,0 <32> 

22 DATA0,0, 123,224,224, 112, 112,224 <193> 

23 DATA224, 192,0,0,0,0,0,0 <213> 

24 DATA0, 0,8, 8,20,20,0,0 <9> 

25 DATA63, 207,247, 123, 167,247,207,63 <73> 

26 D AT A255, 252, 243, 239, 239, 238,238, 2 U <B6> 



27 DATA255,31 ,231 , 123, 123, 1S7, 187,229 
2B DAT A29 , 253 , 254 , 254 1 255 , 255 , 255 , 255 

29 DATA1B4, 191, 127, 127, 255, 255, 255, 255 

30 D AT A25 1,247, 239, 247, 25 1,23 1,207, 255 

31 D AT A255 , 24 1 , 227 , 1 59 , 223 , 239 , 247 , 255 

32 D AT A252 , 243 „ 239 , 223 , 222 , 239 , 243 , 252 

33 DATA63,207, 247 , 1 23 , 1 B7 , 247 , 207 , 63 

34 DA TA4, 54, 255, 255, 255, 255, 255, 255 

35 DAT A52 , 255 , 255 , 255 , 255 , 255 , 255 , 255 

36 DAT A32 , 97 , 243 , 255 , 255 , 255 , 255 , 255 

37 DAT A255 , 255 , 255 , 255 , 255 , 255 , 255 , 255 

38 DATA0 t 0,0,0,0,0,255,255 

39 DATA28,42,73,73,69,34,28,0 

40 DATA0, 247, 132,244,20,20,247,0 

41 DATAB, 16,32, 16,8,80,64, 112 

42 DATAH,0, 0,0, 0,0,0,0 

43 DATA8, 28, 127, 127, 99, 99, 127, 127 

44 DATA0, 0,255, 0,0, 0,0,0 

45 DATAß, 0,0, 0,255, 255, 0,0 

46 DATA24,24,24,24,24,60,126,24 

47 DATA129,66,0,24,24,0,66,129 
4B DATAB, 3, 6, 30, 127, 255, 255, 127 

49 DATA64, 255, 127,127,248,240,255,255 

50 DATA1, 255, 255, 255, 7, 7, 255, 255 

51 DATA254 , 254 , 250 „248 , 250 , 254 , 254 , 250 

52 DATAB, 0,0, 24, 24,56, 120,250 

53 DATA2, 4, B, 16,32,64,64,64 

54 DATA6B T 6B,40,16,24,4,2,1 

55 DATA20,65, 10,32, 138,32,73,20 

56 DATA0, 0,36, 18,03,4,16,0 

57 DATA0, 0,8, 4,16,0,0,0 



<130> 

<163> 

<215> 

<4> 

<254> 

<195> 

<81> 

<203> 

<195> 

<175> 

<20> 

<115> 

<244> 

<50> 

<140> 

<1> 

<74> 

<194> 

<250> 

<193> 

<I16> 

<169> 

<77> 

<6B> 

<19S> 

<6> 

<121> 

<53> 

<159> 

<217> 

<56> 



Compytroni@ 
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SB DATA2.7, 14, 124,56, 120, 104,0 <55> 

59 DATA0,4,62,28,60,20,0,8 <19&> 

60 DATA0, 0,4, 24,24, 0,0,0 <25> 

61 DATO0, 0,0, 8, 16,8,0,0 <196> 

62 DATA255,255,255,24,24,24,24,24 <46> 

63 DATA24,24,24,24,24,24,24,24 <222> 
A4 DATA255,255,}<?5, 195,195,195,195,195 <175> 

65 DATA24,24,60,60 t 102,102,195,195 <50> 

66 DATA203,203,2B3,203,199,i99,199,199 <253> 

67 DATA227, 227, 227, 227, 211, 211, 211, 211 <230> 

68 DATA56, 56, 16, 56, 124,56,40,40 <I7> 

69 DATA60, 66, 153, 161, 161, 153,66, 60 <44> 
100 PRINT , '{C££4fl>"sP0t<EB+4,255:PRINT"tH0rtC DQMH3 

/?EP>"TAB(242)"XZYXZYXZXZYXZXYXYXYXYZ"; <19> 

102 POKEB,16B:FORXl=B120TG8185sPDKEXl,27:POKEXl+ 
30720,2: NEXT: PGKED, 38: POKEA, 190 <191> 

110 FGRXl=lTa2000:NEXT:A*(0>=*"V , :A*<l>="S<' ,, lA*<2 

>="&' <":A*<3>«"St' OtUP. LEFT }* n <194> 

111 A*(4) = "St' O CtfP ££jFT>*"sA*<5>=" ' OfüP 1ET7J*" 
;A*<6>=" O {UP t££T_J*";A*<7)= ,, K«P 4££T}*"s A*<8) - 

" { SPACE UP LEFT SPACE} " <224> 

112 B*<1) = "{S£4C£ POMW LEF7 >4t SP4C£ PO*W LFFT2 1S 
J SPAC Ey "!B$(2> = " { SP/tCE POtfK £CFT >5t SP4C£ PPfW i-E 
FT2?5{S P4CE ? " : BS (3)=B* < 1 ) : B* t4) =" {SPACE. DOHH LEF 

T17 {. SPACE DOHH LEFT2 }b{ SPACE }" <218> 

113 BS i^} =" {SPACE, DOHH LEFT >9 { SPACE DOHH LEFT2 1B 
l SPAC£ y"tB*<6)=" { SPACE DOHH LEFT SPACE2 DOHH 4££ 

13. SPACE2 1 " <142> 

115 FGRX 1 o 1 T05 1 F0RX=2 1 TO0STEP- I : Y=l 0s G05UB 1 49 < 2 1 3 > 

116 PRINT" WHITE ! "A* CD) " CÜP>"B* (El i IFXM7THEND*=D 

+1 " <42> 

118 IFX=18THENE=X1 . <2> 

119 IFX=3+FTHENGOSUB132 <96> 

120 PQKEA, 180+INT<RND(1)*2B1 t FORX2=1TO20:NEXTX2 J 

X <49> 

130 FaRD=5TO8iX=0!Y-10tGDSUB14a: PRINT" IHJUTE}"M 
<D)B*(6)sFORX2=iTO20:NEXTX2 T D <63> 

131 D=0:F=F+2:NEXTXlsFORX2=lTG1000)NEXTsBGTG136 <34> 

132 PDKEA,0:X=X+4jFaRY=9TO16sGasUB14B-.FRINTB*(E) <217> 

133 FGRX2=lT028sNEXTX2,Y:E=6.-X=X-4:PQKEA,12BiF0R 
X2=lTO20:PGKEB,35+INT(RNDtl>*7> :NEXT <53> 

134 POKEB,3a:FGRX2=15TO0BTEP-. 1 tPQKEA+1 ,X2sNEXTi 
POKEA ,0:POKEA+ 1,15: RETURN <247> 
136 POKEA, Bi PRIMT" { HOHE VOHN4 R1GHT4 BLAC K} i {RVS, 

QU SP£C£:JBY^:SP4C£>THÖt1ftS^:SP4C£>R0EDERN , ' <79> 

138 POKEA,130iFQRX=79a8TO7999:POKEX-l,32EPGKEX,3 
sFaRXl=lTO100:NEXTXl,X <10> 

140 F0RX=7999TC7769STEP~23 s PQKEA , 1 3B-HH* 1 s H=H+ 1 3 
PaKEX+23,32sPaKEX,2sFGRXl=iTGlß0sNEXTXl,X <129> 

1 42 POKEA , 240: F0RX=7769T077B9s G=PEEK < X+ 1 > s POKEX- 
l,BsPOKEX+3072ß,lsPGKEX,3 ■ <76> 

143 FaRXl=iTG10ß:NEXTXl,X <11S> 

144 FQRX=77B?T07999STEP21 : PQKEX-21 ,32! PQKEA, 1S0+ 

H*10: H=H-1 s PDKEX ,2: FDRX 1=1TOI00S NEXTX i , X < 136> 

146 POKEA, 130s FORX=799BTa79B8STEP-i:PGKEX+i ,32sP 
OKEX,2:FGRXI=lTai00(NEXTXl,X:PGKE79B8,32 <4> 

147 PGKEA, 0: GOTO i 50 <247> 
14B PGKE2il,X5PaKE2i4,Y:5Y55B640:RETiJRN <113> 
150 FaRXl=lT016;REfiDC,Cl:PQKEA-l T C:FaRX2=lTaCl(N 
EXTX2 f Xl:PGKEA-l,8 <213> 
152 DATA195, 150, 209, 200, 21 7, 100, 215, 100, 217, 100, 
215,100,209,200,217,100,215,200 <14i> 
154 DATA217, 100, 209, 100,215, 100, 217, 100, 215,200, 
217,100,209,300 <4> 
170 FQRK1^1TO2500:NEXT: PRINT" { CLEAR RVSOH D0HH4 
HMT£>WaLLENCSR^F>SIE{S^4ceiDIECSP4C£}SPlEL-<SP 
yqCEiERKLAERUNG C SPÄC ElVaNtSPACE GREEH }TIT(hN{ HHITE 

}?•« <13B> 

175 GETC*:IFC*= ,, N , *THENGaSUB290sGDTO300 <184> 

176 IFG*<>"J"THENi75 <242> 
1B2 GO5UB290 : PR INT" { CLEAR VOHH RVSöm tWEl SPACE } 
FREMDE tSP/TC£>MACHT{ SP4CE >AU5t SP/ICE JDEHt SP4CE > AND 
RaMEDfl-NEBEL< SP/!CF3 >PRQBT< SP/ICE >IN{ SP4CE >UNSEREM 

<241> 
184 PRINT" {RV SOH 1 SONNENSYSTEM C SP/ICE 1 NEUE { SPACES} 
I NTERSTELLARE {SPACE} PU-94 {SP4C£3>RAKETEN , D I E t SM 
C^JEINE" <5B> 

186 PRINT" {RVSOH J UNGEHEURE CSP4CE5 SPRENGKRAFT tS£4 
CE_} HABEN." <229> 

189 PR 1 NT "{ RVSOH 0£(*«>ALS{SPACE>VERSUCHSGBJEKT<S 
P4C£>BE-NUTZENtSP^C£>SI E <.SPACEyDEH<.SPACE8y PLANET 
ENt SPjqCC JSATURN. " <191> 

198 PRINT" {»MW RVSOH} DA Z SPACE }BE I { SPACE } DER { SPA 
CE} ZERSTGERUNGDEB {SPACE} SATURNS tgf£CE>DIE <S£4CE7 
3GRAVITATIQN{SP4C£JDES{SP4CEJSÜNNEN"; <2B9> 



192 print" t rvson } Systems { Space i ins c sp/ico wanken* 

SP4CE4 ?GERAET.< SP4CE >UNDCS fVK:E ?DAttIT{ SP>lCC} PI£iS 
P4CE >ERDEt SP4CE >ZER5T0ERT<SPjjg£>HIRD," <103> 

194 PR INT " { R VSON } HUES5EN { SPACE J 5 1 E {SP4COVERH I ND 
ERN , {SPACE? DASS {SPACE! D I E { S£4CE} RAKETEN tSPACE±1 S 
TARTEN! !" <73> 

202 GGSUB291sPOKE19a,0:WAIT198,l:6GSUB290 <92> 

206 PRINT" { CLEAÜ RVS0N 1 DESHALB {SPACE} KURDEN { SPAC 
EJS1E {SP4CEJ BE-AUFTRAGT , {SPACE. * DIESEtSP4C£7>MISS 
I0N< SP4CE >ZUtSP4COERFUELLEN. " <59> 

207 PPTMT"fgt^ggw^nAFUERtSP4C£}HflBEN{ SP/IC£ >SIECSP 
ÄCF1NUR <SPÄCE2J BEGRENZ TCSP/5C£> ZEIT! !" <81> 
2BQ PRINT" { DO UN RVSOtn SIE C SP/1CO FL IEGEN CSP4CE>liI 

T < SPACE? I HREM {SPACE? SHUTTLE {SPACEJ ZUM {SPACE} T t TA 
N, C SP/1CE JVDNDEMtSP4CClAUSCSPjg£>DIE{Sg4CE>RAKET£ 
N( SP4Cc r' <243> 

210 PRINT" { Jt^50W >STARTENt SP4CE ?S0LLEN. " <2i3> 

212 PRINT" { DOHH /JVSammE{SFACEmiSSlQH< $PACE >BE 
5TEHT { SPACE 3 3 DAR I N , { SPACE > D ASS { SPACE} SlEi SPACE lrV 
QMlSP4CC3>SHUTTLE{$P4CE>MITtSfV1CC> IHREM" <209> 

214 PRI NT "{RVSOKy RAKETENSTUHL {SP4CE3 ENERGIE-* SP£ 
Cf>PLATTEN{SP4Cf.>H0LEN{SP/tC£> UND {SP4CE5J DIESE {SP 
ACE } AUF {. SPACE ^ >DEM< SP4CE >T IT AN" <155> 

216 PRINT" { Sysow ?AN{ SP4Cg >DERtSP4C.E3 BODENSTATION 
ISPACE3J ABLIEFERN ! " <180> 

217 PRINT" {RJ^S^>BEIM<SMCE>AUFNEHMENtSP/ICE}UNDt 
SPACE} AB-LI EFERN {SPACE} DER {SPACE J ENERG IE- { SPACE2 
JPLATTEN<SP4C£> 'FEUERKNOPF ' {S PACE2 } DRUECKEN » " <61 > 
220 Ba5UB29itPaKE198,0lWAIT19e,liGaSUB290 <I1B> 
224 PRINT" { CLEAR RVSQHlVmURCHt SPACE ynlRtK SPACE i 
mTC SPACE JDER{ SPACE2 $ZE.n{ SPACE }Eim SPACE yENERBl 

ESCHI RMUEBER { SPACE } DER { SPACE } STARTRAMPE " < 57 > 

226 PR I NT " { RV SPW >DER { SPACE } PU-94 { SPACE } RAKETEN <S. 
PACE } AUF-GEBAUT, { SPACE } DER{ 5P4C E> VERHINDERT, tSM 
C£JDASSCSP4C£>DIE{SP4CEJRAKETEN{SP4C£>ZUM"j <92> 
22G PRINT" C «JkSaW >SATURN{! SP4Cg >FLIESEN ! " <237> 

230 PRINT" t fi VSOM VOttH y ALLERD I NGB { SP4CO HAT < SPACE 
} D IE { SPACE* } FREMDE { SPACE ! MACHT {SPACE} EI NEW <SPACE_ 
4}KILLER5ATELLITEN£SPaC£>AUF" <6> 

232 PRINT" C HH2TE RVSOfi l DEPK SP4CC >MONDt SP4CO HINT 
ERLASSEN T DER<: SP^C£ >JEDES{ SP4CF >0BJEKTt SP4CE }IN{5 
P^CE3 >0ER t SPACE } NAEHE C SP4CO PER" <146> 

234 PRINT" CWgöW>RAKETENt£P^C£JSTAENDIB{:SP4CE>VE 
R-C SF4CO FOLGT. { SPACE } DIESEM t SP4CE >MUESSEN<SP4ee 
>SIE<: SP^C£ >AUSME'lCHEN{SP/lCE> ! ! " <170> 

236 PRINT" {fi^SM>ABER{:SP4C£}ACHTENCSP4C£}SIEiSM 
C£>DARAUF , DASS CSP^C£JER CSP£C£JMICHT {SPACE} IHR<SP 
^C££JSHUTTLE t SP4Cg >RAMMT ! ! " * GGSUB29 1 <52> 

23B POKE198,8:WAIT198,l <124> 

240 GOSUB298: PRINT" { CLEAR RVSON} IHR {SPACE} HAUtiST 
UHL C SP^Cg ?BRAUCHTt SP4CF >VIELtSP/iC£;>ENERGIE, <SP4C 
£J DESHALB tSP/ICEJ SOLLTEN { SPACE } BlBC SPACEi DlEii SPAC 
OENER-" <195> 

242 PRINT" t flV f SQW >GIEPAKETE, { SP/iCC >DIEt SP4CE lNURt 
SP4CE4 1 KURZE { SPACE } ZEIT C SP4CE >BESTEHEN^SP4CE33AÜ 
FSAMHELN. DIE C SP4CC JENERBIE" ) <169> 

244 PRINT" t ff^S0W >STEHT{ 5P4CE >RECHT3{ SP>JCg >DE3tSP 
ACE RVSOFF } C RVSQH }-{ SPACE3 }ZEtCHEMS. { SPACE }DIE{. 
SPACE} ZEIT t SP>!CE4 >BEFINDET{ SP4CO SIC:Ht SP>*CE >LINK 
S," ~ <2B> 

246 PRINT" CWi/SOW>DERCSP/1CF>SCOREtSP4CC>INC SP4CE > 
DER tSP4CF} MI TTE {QOWm 7U{SFACE}H ILFE tSPjflCEJKOMMTt 
SPACE } IHNEN f. SP,qCg2 :>EIN{SfV}CE>V0N{SP/iCE> IHNEN" <139> 
248 PRINT" C fi^SOW >INSTALLlERTERC SP4CE >BEAM-<SP4Cg 
3_J SATELLIT, t SP4CO DER {SPACE! B I E t SPACES } IRGENDWGH 
INCSPflCEJBEAMT." <170> 

250 PRINT" { RVSOH DOHH YELLGM} ABER { SPACE } ACHTUNG! 
{ SPACE9 } 51 E { SPACE } KQENNEN { SPACE } GENAU { SPACE J AUF t 
SPjqCC3QDER< SP4CF 3NEBENt SP/tC£ >DEN{ SP4CE >KILLER-"j <194> 
252 PRINT" < RV SOH } SATELLI TEN <SP4CE>GEBEAMT t SPACE4 
} WERDEN! ! ! " <217> 

254 GOSUB29l8PaKE19a,03WAIT198,ltGaSUB290 <144> 
256 PRINT" I CLEAR R VSOH} 2E I CHENERKLAERUNG s I UH1TE } 

<32> 
258 PRINT" { DOHHS RIGHT }**' O {UP LEFT3 } + {VP LEFT } , 
tü£ LEFT }\{ V0HH2 RIGHT }*Z RVSOH SPACE VOUH} ..{SPAC 
£>SHUTTLE" ~ <91> 

268 PRINT" { HOHE , D0HH3 R1GHT4 RVSOR } t SP4CC >ENERB 
IEPLATTE": PRINT" {DQHN4 RIGHT3} 1}{ RVSQH SPACE2 } <S 
P4CO BEAMSATELL IT" """ <67> 

264 PRINT" { DOHH RlGHT3 yX.< RVS0N SPACE2 } i SPACE )Kl 
LLERSAT£LLlT"i PRINT" { RlGHT3 }C{ RVSOH SP A C E 27 J. SPA 
CEJSIE" <160> 

268 PRINT" { DOHH RIGHTS } t { RVSOH SPACE2 } t SP4Cf >B0 
DENSTATION":PRINT"CDO«M RIGHT3 }H { RVSOH SPACE2 } i 



Computronic 






SPACE } ENERG IEPAKET " 

270 GGSUB29l!POKE19B,0:WAITl9B,li6O5UB29BiGOTG30 


29» FORXI«12T07asPOKEB-l,Xi:NEXTi RETURN 

291 FGRXl=70TO12STEP-l S PGKEB-l,XliNEXTsRETURN 

300 GOSUB 291 

305 PniHJ"i CLEAFt POJ/W3 >LtSO> »t:HR^(34) "TITANtSP/ie 
EJ 2"CHR* <34> " , »PEEK < 1B6) ", 1 " i IFPEEK < 186) =1TMENPR 
INT" WOHN }" 

306 PRINT"<D0HN15RUN":PRINT"<:HO«EJ'TP0KE631,13jP 
OKE632 , 1 3 : POKE 1 9S , 2 

ENDE DES LISTINGS 



♦ ♦♦ Teil 2 ♦ ♦♦ 



VC20 LISTING + CHECKSUMMEN <V V1.B1 

POKE52,2S:FOKE56,2BsCLRiBOTO10 

1 IFPEEK (252) =0ANDPEEK<7772)=ZTHENC=tjPOKE7772, 3- 
2:F=32sEN=EN-100 

2 RETURN 

3 IFF=10ANDPEEK<252)=0THENPOKE8032+A,35*A=A+ljC« 
0:PGKE7772,28iSC=SC+i25!EN=EN-100:GOSUB7 

4 RETURN 

5 FORD1=12TD70jPOKEO-13,D1:POKEO,128+D1:NEXT;RET 
URN 

6 FORDl=70TOi2STEP-lsPO!<EO-13,Dl:PGKEa t 115+Dl:NE 

XT: RETURN 

7 PRINT" tWÖHE RVSON HHJTE} "TAB<9) SC" < LEFT SPACE} 
»i 

B IFSC<0THENSC=0 

9 RETURN 

10 A=3eB=-2:D=0:E=8076:O=36B77:SG=0sZ=33EN*3330: 
N=0:Yi=0:Y=0iX=l:K=7724:L=lsH=ß;Ai=0 

11 Xi=0:M=0sP=B:G=0sS=32sF=BiC=0ä 1=0: W=B:Q=0s A2= 
0iJ=0:V=B 

12 POKEO+1 , 10:POS<Ea+2, 13: PGKEQ-8,255: GOSUB200I BD 
SUB5; PRINT" £ CLEAR VOJ4H5 } " 5 

93 PRINT" CDOHNJ. WSOtt^SlECS^CEJMUESSENCSP^CFJDI 
ESEtS£^C£5JMISSIONCSP>5C£}IN";LEFT*<STR*(T) ,2) j ". 
"jRIGHT*(STR*(T> ,2) 

94 PRINT" <RKSOW>MINUTENtSF£CE}BEFNDET{SR^CEJHABE 
N, SONST. 

96 GOSUB61 FORD1=1TO3000: NEXT* S0SUB5: PRINT" iCLEAR 
j.. ____ 

97 PGKEQ-8,255: FGRD1=1TO25:PDKE7680+INT<RND<1) »5 
05) , INT <RND t 1 > *2) : NEXT 

98 PRINT" ttWM. DQHN19 tiHITE SPACE6 }*i SPACE }*i.SPA 
CE}* { SPACE 3 RED}' WHITE } J" 

99 PRim"l RED} XV2XYY<Y£U^}l£Ztt {RED} 1XZZIYELLO 
»>ft/?£P?ZXZY2Z"i 

100 PRINT" CC[:EV^JtCPQCCCTVWCCPQEt ,, ; 

101 PRINT"VWrt CUC C5RCC CEC VW[SRC{H2ä£>"tPGKEBi85, 
27:PQKE38905,2 

102 PRINT" WOHE GREEN} 1 < SP ACE J} *• t SPACFAy »»G05UB 
7 ~ ~~ 

103 PRINT" WOHE YELLOH} "TAB< 103} "lEGLlDOUH LEFT4 
JKFHM" 

107 PRINT" WOHE D0UM6 RIGHT4 UHITE SPACE DOM t-E 
FT2_}& * t ) IUP L£FT3 } + WP LEFT } , WOHN RIGHT }*» 
10B FGRD1=0TO21:POKE7702+D 1,34 .-NEXT 

109 PaKE792B,4:POKE7772„28:TI*="00B000" ä GasUB6 

110 IFC-0THENGGSUB1 

111 IFC=1THENGD5UB3 

1 12 BYSB28: R=PEEK (251) s Z=5B=EN=EN-5< IFR=156THEN1 
42 

113 POKEK+X+Y,F 

114 I FR= 1 52THEN Y= Y-22 : Z=58 

115 IFR=14BTHENY=Y+22:Z=58 

116 IFR=2STHENX=X+1:Z=3 

117 IFR=140THENX=X-1:Z=2 

HB IFR=132THENY=Y+22;X=X~1:Z=2 

119 IFR=136THENY=Y-22!X=X-1:Z=2 

120 IFR=24THENY=Y-22:X=X+1:Z=3 

121 IFR=20THENY=Y+22-.X=X + 1:2=3 

126 IFX<0THENX=0 

127 IFX>21THENX=21 
12B IFY<STHENY=0 

129 IFY>374THENY=374 

130 IFF>32THEN300 

131 F=PEEK<K+X+Y> iFA=FEEK (K+X+Y+30720) 

132 I FF= 1 4THENP=0 : P0KEX2 , 32 : F=32 : EN=EN+2B0 

133 P=P+1:IFP=15THENGOSUB460 

134 IFP=BTHENP=0:POKEX2,32 



<255> 

<240> 
<39> 
<211> 
<141> 



<163> 
<52> 



<247> 

<68> 
<144> 

<22B> 
<146> 

<63> 

<1B> 

<102> 

<39> 

<151> 

<76> 

<37> 

<255> 

<36> 

<126> 

<170> 

<0> 

<151> 

<31> 
<32> 

<2B> 

<20S> 

<5> 

<16B> 

<225> 

<139> 

<6>1> 

<8B> 

<95> 

<200> 

<7> 

<28> 

<S5> 

<J82> 

<152> 

<1BB> 

<125> 

<96> 

<67> 

<24> 

<77> 

<7B> 

<241> 

<9B> 

<164> 

<225> 

<104> 



135 IFF=4THENGBSUB350 

142 Q=K+X+YiPOKEQ,ZsPOKEG,240-(Y/S> 

145 PRINT" i HOHE RIGHT2 RVSQM} »M1D* (TI*, 4, 1 >". "RI 

GHT*<TI*,2> 

147 PRINT" IHOHE ßVSON} »TAB (16) EN" iLEFT SPACE } »il 
FEN<0THEN3B0 

148 IFVAL(TI*)>TTHEN400 

152 1=1+1 :IFKDTHEN1 10 

153 I=0:POK£W,S 

155 IFQ>WTHENYl=Yl+22 

160 IFQ<WTHENY1=Y1~22 

166 IFX>X1THENX1=X1+1 

171 IFX<X1THENX1=X1~1 

1B1 U=E+X1+Y1:S=PEEK<W):IFQ=WTHEN300 

1B2 IFS>37THEN500 

185 PDKEW,37:GaTO110 

200 PRINT" t CLEAR DOHN2 RIBHT6 HHJJJE} * {DOHN, LEFT } 
S WIGHT 150JP LEFT}5{. RIGHT }4W0HN LEFT }5<RIGHT}(><. 
UP 4ffT>7tRjetf7J9fO0«N ££FT}B"CHR*<B) S GGSUB250 

201 PRINT" W0NN2 RIGHT } ; WVSOH SPACE}&Yt $PACE }TH 
QMA5< SF/lCg }RQEDERN" ~~~ ' 

202 INPUT"< WQtfC V0HH9 RIGHT RVSON }ÜElN<. SPACE }»PtM 
E C SPACE } " 5 N A* ! I FNA$= " " THEN202 

203 PRINT" W0HN2 GREEN RVSQN SPACE} LEVEL I SPACE } M 
ITf SF4CE >J0YSTICK<: sP4CE4 }HflEHLEN{ SP4CE } ! "jpRINT" 
WOHN RVSON SPACE }ST&RTt SPACE }=C SPACE } 'FEUER'" 

204 PRINT" iSDMK RVSON SPACE } < LEVEL I SP ACE } 1 { SPACE 
}=CSP^Cfc} SCHWER» " 



:PGKEO,200tFGR 



205 SYSB2Bs IFPEEK <251 )=28THENL==L+ls 
Dl=lTO10:NEXT;PQKEG,0s IFL=5THENL=1 
210 IFPEEK<252)=0THENRETURN 

230 PRINT" { HOHE D0HH19 RIGHT RVSON MH I Tg ? LEVEL i " 
L 

231 D=L+1 s T=359- (L*50> : G=40+ (L*5) 
235 GDTD205 

250 RE3TDRE:FaRDl"=0TO34:READA3-.POKE828+Dl,A3!NEX 
Ts RETURN 

251 DATA169, 127, 141 T 34, 145 T 173,32, 145,41 , 128, 133 
,251 ,169,255,141,34 

252 DATA145,173,3I,14S,41,2B,24,101,251,133,25i, 
173,31,145,41,32,133,252,96 

300 FORD 1 =BTD2i POKEG , 45+D1 ! FDKEB+30720 , 1 : FDRD2= 1 
TO300! NEXTD2 , D 1 : POKEQ , Fs POKEQ+30720 , FA 

301 FDRD1=15TO0STEP-.1sPQKEU+1,DIjNEXTsPOKEG,0 

303 POKEO-B , 240t PRINT" J CLEAR DOHN2 HH1TE }SIEZSPA 
CCJHABENt SP4CE ?IHRE<:SPyqcE>MI5SIONLEIDER{ SPjlCE >NI 
CHTCSP/fCf JERFUELLENKDENWEN ! " : M=l : SC=BC-100 

305 FOKEO.0: POKEO-B. 240tPRINT"t POtfW2 RVSON RIGHT 
5>-GAMEtSPiflC£>0VER-":GDBUB9:PDKEa-H , 15: IFM=1THEN 
GDSUB550: GOTO307 

306 GDSUB5BB 

307 SC=SC+EN*Ns PRINT" C DDUN3 }YQUR<. SPACE }SCOREt "SC 
30B IFSO=HITHENHI = SC:NE*=NA* 

309 PRINT" t PgWW2 >HIGHSCQREi "HI ; PRINT" t PgHJO VQN: " 
NE* 

310 PRINT" tPOWW2>NOCHC SP>1CE >EINC 5P l <tCE >SPIEL?" 
312 BETO*SIFA*="J"THEN10 

314 IFA*="N"THENSYS32 
316 G0T0312 

350 PGKEK+X+Y,4 

351 X=INT(RNDU)*20) ( Y=INT !RND! 1 >*1B> : Y=Y*22:F=P 
EEKCK+X+Y) 

354 IFF>32THEN351 
356 RETURN 

400 IFPEEK(8B33)=35THENU=1 

401 PGKEW,S;FDRD1=XT02BTEP-1 

402 PUKEK+D1+Y,F 

403 F=PEEK<K+Dl+Y-l)s IFF>3ANDFO32THENY=Y-22lG0T 
0403 

406 PGKEK+D1+Y~1,2:FGRD2=1TO50:NEXTD2,D1 

407 FORD2=K+D 1 +YTD7724BTEP~22s PUKED2+22 , 32 : POKED 
2,58s IFU=1THENPOKEB033,35 

408 FORD3=lTO50sNEXTD3,D2 

410 Ft0)=B016sF(2)=7974?F(4)=7932-. IFV=3THENPRINT 

"J CLEAR DONN } DU IS P ACE > HAST t SPACE } ES l SPACE } GESCHfl 

FT! ! Z DOUl-f } "t»=l! GDTO305 ' 

414 V=V+l:B=B+2sPDKEO,12B:FORDi=lTO2800sNEXT 

416 FORDl=S104+BTGE*(B)STEP-22s IFPEEK<D1 ) 03STHEN 

424 

420 FORD2=0TB2 ; POKED 1 +22, 45+D2: POKED 1+44, 32 (J=J+ 

20: POKEQ, 240-J 

422 FORD3^1TO430:NEXTD3,D2!POKEQ,0:POKEDl+22,32* 

A 1 =0 : J=0: A2=A2+42: 60T04 1 

424 Al=Al+lsIFAl>lTHENAl=2;PDKEDl+44,32 



<210> 
<65> 

<207> 

<202> 
<195> 
<1B3> 
<135> 
<17B> 
<2B0> 
<I01> 
<124> 
<153> 
<102> 
<157> 



<45> 

<178> 

<126> 

<27> 

<45> 

<121> 
<B5> 

<93> 

<I63> 

<60> 

<53> 

<1B4> 

<9> 

<137> 

<223> 

<179> 



<16> 
<146> 
<254> 
<111> 

<228> 

<73> 

<246> 

<210> 

<135> 

<3B> 

<247> 

<3> 

<243> 

<14> 

<23> 

<4> 

<129> 
<189> 

<0> 
<19> 



<253> 
<141> 



<24> 
<162> 



<156> 
<149> 



Com puf ronio 



21 



c 



si* 



426 POKED 1 +22 , 46: P0KED1 , 36 i FDRD2= 1 TO400 : NEXTD2 , D 

i!PQKEF(S> ,32:PtJKEF(B> +22,32 <143> 
42B FORDl=8016-A2TO7927STEP-2i jP0KED1+21 ,32sPDKE 

Dl,48+H:B=B+l <2S4> 

430 IFB>3THENH=H+lsIFH=4THENH—48 <33> 

432 POKEG+1,10-» <164> 
434 FDRD2=lTO4B0iNEXTD2,DlsPOKE7B27 f 32;FDRDi»iTO 

2000: NEXT <129> 

436 POKEO,200iPaK£a+l,15 <141> 

440 fl« ( !>■="! /GL { POtttt LCFT4 > KFHH" <201> 

442 A*(2)="I..L<;D0M 4££I4}K. .M" <46> 

444 A*(3)«="I — LIQOHH. LEFT4 JK — M" <252> 

446 A*(4>«" WOHN LEFT4 > " <79> 

448 ftt(S)="tfiP4C£> — tSP AC E DOHH LEFT4 SPACE ! — tS 

PACE}" <12S> 
45B A» ( 6> a" ISPAC C y . . < SPACE BOUN LEFT4 SPACE} . . CS 

PACE 7 " <187> 

452 A» <7> =»" CSP ACE }/ I SPACE2 VO ttN LEFT4 SPACE4} ■ <56> 

454 fl*{e)="{SMCE4 POHg LEFT4 SPACE4 1 " <iB3> 
456 FDRDl = ITDBlPRINT ,, tWOrt£ VEX jL WO " TAB < 1 03 > ft» < D 1 

);F0RD2=lT035sNEXTD2,Dl <S9> 



457 FaRDl=i5TQ0STEP-. lsPQKED+i,Di:NEXTtPOKEa f 0tF 

ORDl=iTQ3B00:NEXT:PRINT"<:CJjE4« PPWW2 J " i BQTO303 

460 X2=INT(RND(l)*374)+7724i IFPEEK<X2X>32THEN46 



462 PQKEX2, 14: RETURN 

500 PGK£7772,32:FGRDl=lTO30:X=INT<RNDU)#4)sY»IN 
T<RND(1>*4)5POKEO,130+X*10 

501 P0KE7793+X+22*Y,45+INT(RND(t>*2)sNEXT 

503 FORX 1- 1TQ00« X=INT (RND < i ) *4> s V-INT (RND <1) *4> S 
PÜKEO+1 , 15- (XI«. 1S75) 

504 PÜKE7793+X+22*Y,32: NEXTs 6OTO303 

550 FQRD1=IT01 1 : READA3, A4SPOKEO-1 ,A3» F0RD2»1TÖA4 

*200: NEXT: POKED-1 ,01 NEXTs RETURN 

552 DATA195, 3, 195,2, 195, 1,195, 2, 203,2,201, 1,201, 

2,195,1,195,2,191,1,195,3 

580 F0RDl=lT011(READA3,A4iNEXT 

581 F0RD1=1T01 1 (READA3 ,A4i POKEO-1 , A3: F0RD2MT0A4 
*5 : NEXT : POKEO- 1 , 1 NEX Tl RETURN 

582 DATA201, 40,207, 40, 195, 40, 135, 40, 175,80,201 ,4 
0,207,40,195,40,135,40,175,80,175,80 
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Memory 



Richtig checken - dann Bilder aufdecken! 



Vom Kinderspiel zum Computerspiel! 



Dem Gesellschaftsspiel nachempfunden, 
gibt es jetzt das beliebte Kinderspiel „Me- 
mory" auch für den C-16. Ob auf dem Tisch 
oder auf dem Bildschirm, dieses Spiel ist ein 
Dauerrenner für jung und alt. Dies zeigte 
sich auch in der Redaktion, die ihr Erinne- 
rungsvermögen ausreichend prüfte. Nicht 
nur im Vergleich untereinander, sondern 
auch mit dem Computer. 
Zum Spiel: Der Computer mischt die 60 
Bildkarten und zeigt sie verdeckt auf dem 
Bildschirm. Der Spieler, welcher am Zug 
ist, deckt zwei Karten auf. Stimmen diese 
im Bild überein, werden die Karten ent- 
fernt, und der Spieler erhält einen Punkt 
gutgeschrieben. Anschließend darf er zwei 
weitere Karten aufdecken. Sollte er ein un- 
gleiches Paar aufgedeckt haben, werden die 
Karten verdeckt zurückgelegt, und der 
nächste Spieler ist dran. Wer am Schluß die 
meisten Punkte zusammen hat, ist zwangs- 
läufig der Gewinner. Merken Sie sich also 
gut, wo die schon einmal aufgedeckten 
Karten liegen. 

Steuerung: Nach dem Starten erscheint zu- 
nächst das Titelbild. Durch Drücken irgen- 
deiner Taste beginnt das Spiel. Zunächst 
muß mit der Tastatur die Anzahl (max. 3) 
sowie die Namen der Spieler eingegeben 
werden, und sodann muß darüber entschie- 
den werden, ob der Computer mitspielt 
oder nicht. Soll der Computer teilnehmen, 
kann seine Spielstärke von „1 = sehr 
schwach" bis „8 — unschlagbar" gewählt 
werden. Ab jetzt wird nur noch mit dem 
Joystick (Port 1) gespielt. Die auserwählte 
Karte erscheint dunkler als die anderen. 
Durch Drücken der Feuertaste wird die 



Karte aufgedeckt. Danach wird per Joystick 
die nächste Karte ausgewählt und aufge- 
deckt (dabei kann sich die Farbe des ersten 
Bildes ändern, da beim Aufdecken eines 
Bildes zwei Hintergrundfarben für jedes 
Bild individuell sind). Drücken Sie dann 
den Steuerhebel in eine beliebige Rich- 
tung, so werden die Karten entfernt oder 
wieder umgedreht. Das kommt darauf an, 
ob die Karten gleich oder verschieden wa- 

Was Memory betrifft, kann 
ich einfach nicht verlieren! 



ren. Der Name des Spielers, der gerade an 
der Reihe ist, erscheint in der ersten Zeile. 
Tips zum Abtippen: Das Listing im Monitor 
eintippen. Ist alles eingegeben, verläßt 
man den Monitor mit X (Return). Nun gibt 
man folgende Pokes im Direktmode ein: 
Poke 45,202 : Poke 46,49 und speichert das 
Ganze mit SAVE ,,MEMORY",8(,l) ab:. 
Das Spiel kann dann mit RUN gestartet 
werden. 
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7a 


7a 


7f 


7f 


55 


55 


55 ff 


>2fc9 


55 


80 


03 


©a 


63 


0f 


3f 


55 


>3639 


ed 


ed 


ed 


ed 


ed 


ed 


ed 


7b 


>3149 


aa 


aa 


ff 


ff 


^ 


55 


55 ff 


>2fdl 


55 


8f 


3f 


ff 


ff 


ff 


ff 


55 


>3091 


7b 


7b 


7b 


7b 


7b 


7b 


7b 


bb 


>3151 


aa 


aa 


ff 


ff 


55 


55 


55 ed 


>2fd9 


55 


-fd 


fd 


fd 


fd 


fd 


fd 


49 


>3099 


bb 


ba 


ba 


bf 


bf 


aa 


aa 


fe 


>3159 


ad 


ad 


fd 


fd 


55 


55 


55 Sa 


>2fel 


43 


4f 


7f 


7f 


7f 


7f 


7f 


ff 


>30al 


fe 


aa 


aa 


-ff 


ff 


aa 


aa 


ed 


>3161 


5a 


5a 


5a 


5a 


5a 


5a 


5a 5a 


>2fe9 


ff 


■ff 


ff 


ff 


ff 


ff 


ff 


•ff 


>30a9 


ed 


ed 


ed 


ed 


ed 


ad 


ad 


7b 


>3169 


5a 


5a 


5a 


5a 


5a 


5a 


5a 5a 


>2ff 1 


ff 


ff 


ff 


ff 


ff 


f* 


fa 


fd 


>30bl 


7b 


7a 


7a 


7f 


7f 


55 


55 


ff 


>3171 


5a 


5a 


5a 


5a 


5a 


5a 


5a 08 


>2ff9 


fd 


fd 


f9 


©9 


a9 


a9 


a9 


7f 


>30b9 


ff 


aa 


aa 


ff 


ff 


55 


55 


ff 


>3179 


00 


00 


00 


80 


00 


00 


88 fe 


53861 


7f 


7f 


7f 


7f 


7f 


7e 


7a 


ff 


>39ol 


ff 


aa 


aa 


ff 


ff 


55 


55 


fd 


>3131 


fl 


06 


e3 


dl 


f? 


b5 


ee 83 


>3889 


■f-f 


fe 


fa 


ea 


aa- 


aa 


aa 


ea 


>39c9 


fd 


ad 


ad 


fd 


fd 


55 


55 


4a 


>3189 


fl 


fl 


fd 


d5 


fl 


e6 


fl dA 


>3811 


aa 


aa 


aa 


aa 


aa 


aa 


aa 


a9 


>30dl 


4a 


4a 


4a 


4a 


4a 


4a 


4a 


4a 


>3191 


f2 


96 


a5 


f6 


ba 


d4 


e6 e6 


>3019 


a9 


a9 


a9 


a9 


a9 


a9 


ad 


6a 


>30d9 


4a 


4a 


4a 


4a 


4a 


4a 


4a 


55 


>3199 


c6 


c6 


el 


f4 


89 


9b 


88 00 


>3021 


6a 


Sa 


6a 


6a 


6a 


55 


t>5 


aa 


>30el 


55 


55 


7f 


7f 


7a 


7a 


7f 


55 


>31al 


00 


00 


00 


00 


00 


00 


88 af 


>3029 


aa 


aa 


aa 


aa 


aa 


55 


55 


aa 


?30e9 


55 


55 


ff 


-ff 


aa 


aa 


ff 


55 


>31a9 


dd 


f8 


e3 


e8 


eS 


e8 


e5 f6 


>3S3i 


aa 


ab 


af 


bf 


ff 


55 


55 


bd 


>30fl 


55 


55 


ff 


ff 


aa 


aa 


ff 


55 


>31bi 


c2 


c9 


el 


c6 


b6 


dl 


b9 9e 


>3039 


fd 


fd 


fd 


fd 


fd 


55 


55 


6b 


>30f9 


55 


55 


fd 


fd 


ad 


ad 


ed 


7f 


>31b9 


bb 


e3 


f7 


aS 


dd 


oa 


ce ce 


>3041 


6b 


6b 


6b 


6b 


6b 


6b 


6b 


6b 


>3101 


7a 


7a 


7b 


7b 


7a 


7a 


7f 


ff 


>3iol 


eb 


eb 


f8 


ff 


e7 


95 


09 88 


>3849 


6b 


6b 


3a 


23 


ff 


3a 


3a 


55 


>3109 


aa 


aa 


ff 


ff 


aa 


aa 


ff 


ff 


>31c9 


09 


43 


4d 


00 


88 


00 


88 88 


>3Q51 


55 


7f 


7f 


7a 


7a 


7b 


7b 


55 


>31il 


aa 


aa 


ff 


ff 


aa 


aa 


ff 


ed 


>31dl 


48 


00 


03 


80 


00 


00 


88 4b 


>3059 


55 


ff 


ff 


aa 


aa 


ff 


ff 


55 


>3119 


ad 


ad 


fd 


fd 


ad 


ad 


ed 


7f 


















>3061 


55 


ff 


ff 


aa 


aa 


ff 


ff 


55 


>3121 


7a 


7a 


7b 


7b 


7a 


7a 


7f 


ff 


















>38S9 


55 


fd 


-fd 


ad 


ad 


ed 


ed 


7b 


>3129 


aa 


aa 


ff 


ff 


aa 


*ft 


ff 


ff 


Ende des Lisiin 


gs 




Daß es außer „Weltraumgeballer" und an- 
deren Actionspielen auch andere Interes- 
sante Spiele gibt, ist leider nur den wenig- 
sten bekannt. Aus diesem Grund haben wir 
uns diesmal entschlossen, das Spiel QUA- 
DRATO zu veröffentlichen. Dieses Spiel 
hat eine schlechte Grafik, einen mageren 
Sound, keine Laserkanonen oder sonstige 
moderne Ausstattung : und ist trotzdem 
Spitze! Das Spiel habe ich zum ersten Mal 
auf einem ATARI 800 gesehen; es gefiel 
mir so gut, daß ich mich spontan entschloß, 
eine IBM-, eine C-64-und diese C-16-Ver- 
sion zu schreiben. Übrigens: Die Atari-Ver- 
sion ist ebenfalls in diesem Heft abge- 
druckt. 

Das eigentliche Spielgeschehen ist 
denkbar einfach. Auf einem Spielbrett von 
9 mal 9 Feldern Größe werden zufällig 
Steine verteilt. Nun sucht der Rechner, 
ebenfalls zufällig, eine Kombination von 3 
mal 3 Steinen aus diesem Feld heraus, und 
zeigt diese in einem kleinen Fenster an. Ih- 
re Aufgabe ist es, blitzartig diese Kombina- 
tion auf dem Brett zu finden. Zu diesem 
Zweck steuern Sie mit einem Joystick in 
PORT 1 einen Cursor von 3 mal 3 Feldern 
Größe. Haben Sie das Feld gefunden, so 
betätigen Sie den Feuerknopf, und der au- 



genblickliche Bonus wird zu Ihrem Score 
hinzuaddiert. Drücken Sie im falschen Mo- 
ment den Feuerknopf, so wird der augen- 
blickliche Bonus abgezogen. Das Ganze 
sollte möglichst schnell vonstatten gehen, 
da der Bonus laufend heruntergezählt 
wird. Ist die Bonusanzeige bei angelangt, 
so ist das Spiel beendet, und Sie können 
sich eventuell In der Highscore-Tabelle 
verewigen. Übrigens, bei den Diskettenbe- 
sitzern wird der Highscore automatisch ab- 



gespeichert und bleibt somit für alle Zeiten 
erhalten. Bei den Kassettenbesitzern bleibt 
die Highscore-Tabelle nur bis zum Aus- 
schalten erhalten. Das Spiel ist nicht so ein- 
fach, wie es sich vielleicht anhört. Ein lang- 
sam ansteigender Schwierigkeitsgrad, mit 
immer komplizierteren Bildern und immer 
weniger Zeit, wird so manchen zur Weisglut 
treiben. Wir können dies gut beurteilen, 
schließlich haben wir es Stunden in der Re- 
daktion getestet. Das Programm wurde so 
entwickelt, daß ein Umschreiben ftir Kas- 
setten- und Diskettenbenutzer nicht not- 
wendig ist. Die Diskettenbenutzer müssen 
lediglich vor dem ersten Programmstart 
den Highscore-Ersteller ab Zeile 21000 an- 
springen. Geben Sie zu diesem Zweck den 
Befehl GOSUB 21000 im Direktmodus 
ein. Danach kann das Programm ganz nor- 
mal abgespeichert werden. Viel Spaß. 




Sie sind also der Meinung, zur Zeit der beste Stratege weit und breit zu sein! 
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10055 


RETURN 


<252> 




ti :?» . #Ä :■ WM '■' -<fc# • " : ■ 












10060 


: 


<173> 










11000 
11005 


REM ZEIGE FENSTER 

PRINT" {HOHE GRHG RVSOHi"f 


<105> 
<4> 










C-16 LISTING + CHECKSUMMEN (OC V1.0) 




11010 


PRINTTAB (23) "{RVSOH CA SC CR SC CR SC CS}" 


<246> 






11015 


FOR 1= 1 TD 2 


<127> 


1 REM ******»*###»*#*»***********»•♦»** 


<4> 


11020 


PRINTTAB <23>"{fikS0W SB SP4CE SB SPACE SB S 




2 REM # QUADRATO * 


<39> 


/MCE SB}" 


<5> 


3 REM * 1987 - C-16 VERSION F. BRALL » 


<247> 


11030 


PRINTTAB (23) "{.RVSOH CO SC_ S£ SC S£ SC. CW>" 


<174> 


4 REM * EIN TAKTIK U. STRATEGIE SPIEL * 


<233> 


11035 


NEXT I 


<90> 


5 REM * FUER KASSETTE UND DISKETTE * 


<18> 


11040 


PRINTTAB (23) "{RVSOH SB SPACE SB SPACE SB S 




6 REM *****»*****♦»■»»*#*«#*****#******* 


<9> 


FACE SB>" 


<25> 


7 REM * HIGHSCORETABELLE NUR AUF DISK * 


<136> 


11050 


PRINTTAB(23) "{RVSOH CZ SC CE SC CE SC CX}" 


<194> 


8 REM *****«******■**««*#*■*■*»»*♦«******» 


<11> 


11052 


FOR Y= 1 TO 3: FOR X=l TO 3: FENSTER<X ,Y)=0: 




9 VOL B 


<S4> 


NEXT X,Y 


<146> 


10 DIM BRETT <9,9)sREM SPIELFELD 


<127> 


11055 


RETURN 


<232> 


11 DIM FENSTER <3,3):REM FENSTER 


<93> 


11060 


s 


<153> 


12 DIM HN*<9):REM HIGHSCORE NAME 


<111> 


12000 


REM SETZE STEIN (VARIABLE X,Y) 


<70> 


13 DIM HS (<?):REM HIGHSCORE PUNKTE 


<124> 


12010 


PRINT" CHÖ/fE DOHHJ"i 


<126> 


20 FARBRAM=2048 


<35> 


12012 


BRETT (X,Y>=1 


<40> 


25 PDKE 65301, 0s POKE 65305,2: REM FARBE 


<99> 


12015 


IF Y=l THEN 12030 


<38> 


27 GDSUB 30000: REM COPYRIGHT 


<238> 


12020 


FOR !=•! TO Y-l : PRINT" CP0WW2}":: NEXT I 


<102> 


30 GDSUB 22000: REM HIGHSCORE INIT 


<13> 


12030 


PRINT TAB((1+(X-1>*2) }" {RVSOH BLUE SPACE R 




40 : 


<98> 


VSOFF}" 


<I50> 


80 CX=l:CY=lsREM CUR50RP0SITIDN 


<229> 


12040 


RETURN 


<197> 


85 QUATRATE = 20 


<61> 


12050 


i 


<123> 


100 5=0 s REM 5CORE=0 


<16> 


13000 


REM SETZE FENSTERSTEIN <VAR X,Y) 


<205> 


103 P=1:REM PICTURE=1 


<39> 


13010 


PRINT" {HOHE P0WtfJ"i 


<106> 


104 BA=5:REM BQNUSABZUG 


<S4> 


13012 


FENSTER <X,Y)=1 


<19> 


105 GOSUB 17B00JREM BILDSCHIRM INIT 


<184> 


13015 


IF Y=l THEN 13030 


<25> 


107 GOSUB 24000: REM SORTIERE 


<230> 


13020 


FOR 1=1 TO Y-l :PRINT" {DQHH21 "i : NEXT I 


<82> 


10S GDSUB 23000» REM HIGHSCORETABELLE 


<5S> 


13030 


PRINT TAB((24+tX~l>*2> ) "{.RVSOH BLUE SPACE 




110 B=2000:REM BONUS SCORE 


<4B> 


RVSOFF1" 


<16> 


111 N=0:REM FL AG FUER NEUES BILD 


<36> 


13040 


RETURN 


<176> 


115 GOSUB 10000: REM ZEICHNE BRETT 


<34> 


13050 


; 


<102> 


120 GOSUB 11000: REM ZEICHNE FENSTER 


<209> 


14000 


REM ZUFALLSFELD 


<149> 


150 GOSUB 14000t REM ZUFALLSFELD 


<195> 


14010 


FOR T= 1 TO BUATRATE 


<204> 


160 GOSUB 15000: REM UEBERNEHME FENSTER 


<225> 


14020 


X=INT(RND<1)»9)+1 


<41> 


170 GOSUB 16000: REM JOYSTICK/CURSOR 


<226> 


14030 


Y^INT (RND ( 1 ) *9> +1 


<52> 


450 B=B-BA: IF B<0 THEN B=0 


<179> 


14040 


GDSUB 12000 


<99> 


455 SOUND 1,400,5 


<68> 


14050 


NEXT T 


<66> 


490 IF «J0Y<1> AND 12B>=12B THEN OOSUB 19000 


<231> 


14060 


RETURN 


<176> 


500 GOSUB 18000: REM ZEIGE BONUS 


<214> 


14070 


■ 


<102> 


504 IF N=ITHEN SOUND 1,500,10 


<10> 


15000 


REM UEBERNEHME IN FENSTER 


<5> 


505 IF N=l THEN P=P+1 : QUATRATE=QUATRATE+1 tBA=BA+ 




15020 


XF=INTfRNDCl>*7)+l 


<64> 


l:GOTD 110 


<1> 


15030 


YF=INT(RND(l)*7)+i 


<75> 


510 IF B>0 THEN 170 


<75> 


15040 


FOR Y= 1 TD 3 


<109> 


511 FOR F=250 TO 30 STEP -8 


<107> 


15050 


FCR X= I TO 3 


<117> 


512 FOR 1=1 TD 10 sNEXT I 


<213> 


15060 


IF BRETT<XF+X-!,YF+Y~1)=1 THEN GDSUB 13000 


<54> 


513 SDUND 1,F,5 


<245> 


15070 


NEXT XsNEXT Y 


<189> 


514 NEXT F 


<18> 


15080 


RETURN 


<176> 


515 GOSUB 24000: REM SORTIERE 


<128> 


15090 


: 


<102> 


520 GOSUB 23000: REM HIGHSCORETABELLE 


<216> 


16000 


REM BEWEGE CURSOR (JOYSTICK) 


<95> 


600 PRINT" ICYAN HOHE D0UH22 SPACE! ANDTHERCSPjflCEJ 




16025 


J=JGYU) ;J=(J AND 15) 


<97> 


G AME t SPACE } Y /N CSPACE2 > " 


<141> 


1602B 


IF J = THEN 16140 


<23B> 


610 GET E*:IF E*="" THEN 610 


<28> 


16030 


SYS 82B,CY,CX,7 s REM CURSOR LOESCHEN 


<25> 


620 IF E*="Y" THEN 80 


<117> 


16040 


IF J=l THEN CY=CY-1 


<45> 


630 IF E*="N" THEN 650 


<109> 


16B50 


IF J=5 THEN CY=CY+1 


<60> 


640 GOTO 610 


<2B2> 


16060 


IF J=7 THEN CX=CX-1 


<72> 


650 PRINT" {CLEAR BLUE VOttH SPACEIVIESESISPACEITR 




16070 


IF J-3 THEN CX=CX+1 


<S5> 


ONIC-PR0GRAMM{S/MC£>GIBTCS/MC£}ES" 


<198> 


16100 


IF CX>7 THEN CX=7 


<249> 


660 PRINT" ISPACEyfWJCHlSPACEJFUERlSPACEyüEHlSPACE 




16110 


IF CX<1 THEN CX=1 


<177> 


>ATARI ,C16lSPACE'iUNDiSPACE'i IBMfSPflCFlPCCSPJlCF} ! " 


<3> 


16120 


IF CY>7 THEN CY=7 


<24> 


670 PRINT" ICYAH DOHH SfVJCE}C64/C16/IBM{SP/?CE}VER 




16130 


IF CY<1 THEN CY=1 


<209> 


5I0NtS/ s 4CE>BEI€SP4CF3F.BRALL" 


<1> 


16140 


SYS B2S,CY,CX,4 


<43> 


660 END 


<42> 


16150 


RETURN 


<227> 


10000 REM ZEIGE BRETT 


<29> 


16160 


- 


<153> 


10005 COLOR 1,8,0 


<229> 


17000 


REM BILDSCHIRM INITIALISIEREN 


<2> 


1Ö010 PRINT" K.HOME RVSOH CA SC CR SC CR SC CR SC 




17005 


PRINT" {CLEAR DOHH RIGHT31 VE£ £0*0 QUADRATO" 


<77> 


CR SC CR SC CR SC CR SC CR SC Csy 


<1B7> 


17006 


PRINT" {RIGHT31 YELLOHJ 1987{SVMC£}BEI" 


<165> 


10015 FOR 1= 1 TO B 


<1B3> 


1 7007 


PRINT" {R2GHT31 YELLOH SPACE }F. BRALL" 


<106> 


10020 PRINT" {.RVSOH SB SPACE SB SPACE SB SP4CE SB 




17010 


PRINT" {PURPLE DOHH4 RIGHT201 HI GHSCORECSPjHC 




SPACE SB SPACE SB SPACE SB SPACE SB SPACE SB SP 




EJi^SHlFT SPACES" 


<7> 


ACE SB>" 


<144> 


17020 


PRINT" WOHN RIGH72ff> BONUSSCDRE: {SHIFTSPACE 




10030 PRINT" {.RVSOH CQ SC S+ SC $+ SC S+ SC S+ SC 




J" " 




<149> 


S+ SC S+ SC S^ SC S+ SC C«>" 


<155> 


17030 


PRINT" {DOHH RIGHT291 Y DUR {SP /ICE! SCORE* CSHIF 




10035 NEXT I 


<110> 


TSPACEJ" 


<152> 


10040 PRINT" CRVSOH SB SPACE SB SPACE SB SPACE SB 




17100 


GOSUB 20000 


<95> 


SPACE SB SPACE SB SPACE SB SPACE SB SPACE SB SP 




17300 


RETURN • 


<101> 


ACE SBJ" 


<164> 


17310 


i 


<27> 


10050 PRINT" {RVSOH CS SC CE SC CE SC CE SC CE SC 




18000 


REM ZEIGE BONUS 


<180> 


CE SC CE SC CE SC CE SC CX>" 


<131> 


18010 


PRINT" {«MITE HOME POHH1G RIGHT3i SPACES LE 




10051 PRINT" ICYAH S/MCESJPICTURE: "P 


<185> 


FT5J"B 


<40> 


10052 FÜR Y= 1 TO 9:FOR X=l TD 9i BRETT (X ,Y>=0i NE 




18100 


RETURN 


<136> 


XT X t Y 


<1B1> 


18110 


■ 


<62> 
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1900(3 REM FENSTER VERGLEICHEN 

19005 U=B 

19010 FOR Y<=0 TD 2 

19015 FOR X=B TD 2 

19020 IF BRETT (CX+X,CY+Y)OFENSTERO<+1 ,Y+1 ) THEN 

U=l 
19030 NEXT XsNEXT Y 
19040 IF U=i THEN S=S-BsN=0 
19060 IF U=0 THEN S=S+BsN=l 
19070 IF U-1THEN SOUND 1,B00,1B 
19080 GOSUB 20000 
19100 RETURN 
19110 ; 

30000 REM ZEIGE SCORE 

20010 PRINT" C WttiT E HOHE 00HH12 R1GHT31 SPACES LE 
£75} "S 

20100 RETURN 
20110 : 

21000 REM *******#»**■***********»#*###* 

21001 REM * DIESES UNTERPROGRAMM ER- * 

21002 REM * STELLT DIE DISKETTEN HIGH-* 

21003 REM * SCORETABELLE, * 

21004 REM ##************#********#***#* 

21010 OFEN 1,0,2,"@:QSCR,S,W" 

21011 FOR 1= 1 TO 9 

21020 PRINT»! . "FHAMKt SPACES y " 

21024 PRINT# 1,1*3500 

21030 NEXT I 

21040 CLDEE 1 

21050 PRINT" {OOtfH>HIGHSCQRETABELLE<SPAC£> WURDE tS 

P4CJTT ERSTELLT iSPACE7 ! " 

21060 RETURN 

21070 i 

22000 REM HIGHSCORE INIT/LADEN 

22010 IF FEEK(174)=B THEN 22100 

22015 FOR 1= 1 TO 9 

22020 HN* ( I ) =" FRANK ( SPACES ! " 

22024 HS(I)=I*3500 

22030 NEXT I 

22040 RETURN 

22090 : 

22100 OPEN l,8,2,"ß5CR,S,R" 

22110 FOR 1= 1 TO 9 

22120 INPUT#1,HN*(I> 

22130 INPUT#1,HSU> 

22140 NEXT I 

22150 CLOSE 1 

22160 RETURN 

22170 : 

23000 REM HIGHBCORETABELLE ANZEIGEN 

2301B PRINT" ( HOME I)OtiN14 >"i PRINT TAB < 20) " I RVSOH 

GREEN SPACE IH 1 GHS CO RETABELLE I SPACE2 D.BLUE y» 

23050 FOR 1=1 TO B 

23060 PRINT TAB < 19) I " t LCFT l . t SPACE l "LEFT* <HN# ( I ) 

,9);"'*HStI> 

23070 NEXT I 

23100 RETURN 

23110 : 

24000 REM SORTIERE HIGHSCORE 

24010 HN*<9>="!" 

24020 HS(9)=S 

24030 FOR 1=1 TO 9 

24040 FOR T=l TO 7 

24050 IF HSmcHSd) THEN GOSUB 24500 

24060 NEXT TsNEXT I 

24070 HS=HS(UsREM HIGHSCORE 

24000 GOSUB 25000 

24100 FOR 1= 1 TD 8 

24110 IF HN*U><>"!" THEN 24130 



24115 POKE 239,0 



/' 



<197> 
<20B> 
<245> 
<24B> 

<130> 

<49> 

<203> 

<224> 

<2> 

<35> 

<116> 

<42> 

<244> 

<42> 

<96> 

<22> 

<9> 

<94> 

<97> 

<151> 

<13> 

<47> 

<220> 

<124> 

<69> 

<140> 

<i32> 

<0> 

<36> 

<21B> 

<127> 

<12S> 

<203> 

<243> 

<109> 

<120> 

<252> 

<21S> 

<231> 

<43> 

<119> 

<40> 

<230> 

<222> 

<116> 

<42> 

<221> 

<109> 
<213> 

<102> 

<140> 

<36> 

<21B> 

<99> 

<149> 

<185> 

<178> 

<210> 

<32> 

<166> 

<14B> 

<206> 

<243> 

<252> 

<5> 



24120 PRINT"tWöWE DOHH22 YELLOU SPdCE iNAMEi (. SPAC 

£>"( " " <130> 

24122 INPUT HN*(I) :HN*(I)=HN*<I)+ "tSP4C£i4J" <74> 

24125 GOSUB 26000s REM 5AVE HIGHSCORE <229> 

24130 NEXT I <1B0> 

24300 RETÜRN <2!6> 

24310 s <142> 

24500 MS=HS ( I ) j M*=HN* ( I > <69> 

24510 HS([)=HS(T):HN*(I)=HNf <T> <107> 

24520 HS <T)=M5:HN*m=M* <57> 

24530 RETURN <19i» 

24540 s <117> 

25000 REM ZEIGE HIGHSCORE <14> 
250i0 PRINT" < Uft 1TE HOHE UOMHQ RJGHT31 S PACES £E£ 

I5>"HS <18> 

25100 RETURN <252> 

25110 s <179> 

26000 REM 5AVE HIGHSCORE <209> 

26005 IF PEEK<174)=1 THEN RETURN <152> 

,26010 DPEN i,B,2,'*asQSCR,S,W" <202> 

26020 FOR 1=1 TO 9 <I2B> 

26030 PRINT* 1,HN*U) <224> 

26040 PRINT*1,HS(I) <145> 

26050 NEXT I <59> 

26060 CLOSE 1 <51> 

26070 RETURN <20i> 

260B0 : <127> 

30000 REM ANFANGSBILD INITIALISIERUNG <235> 
3B010 PRINT" C CLEAR D0HN2 YELLOU SPACE 1 2 Tt O C SPACE 1 
Ul SPACE lAt SPACE lDlSPACEyRtSPACElfii SPACE lTZ SPACE} 

o" <tm> 

30020 PRINT" (VOM SP ACEig ? C 1 6 ( SPACE ! VER3I QN Z SPAC , 

E1F' tSP£Qi? BRALL" <222> 

3003B FR INT "{ WWW SPACE1 5 } <C> ( SPACE ! 1987" <39> 

30040 FRINT"<P0WWI4 GREEN SPACE6 > B 1TTE ( SPACE ! WAR 

TEN { SPACE > I CH t SPACE ! PQKE( SPACE > DATEN C SP4CE > ! " <23S> 

30510 GOSUB 60000! REM CURSOR MC -ROUTINE <59> 

30515 PRINT "{. HOHE DOHH21 CYAH SPACET} PRESS (SPACE. 

?ANY{ s?4C£ >KEy^: sp/^cc ^TP^:sp/^cF>cpNTINUEt sP4C£7} ^' <ss> 

30516 POKE 239, 01 REM C16 TASTENZAHL ' <24B> 

30517 GET E*i IF E*=" " THEN 30517 <200> 
30520 RETURN <6i> 
30530 s <243> 
60000 DIMH<75>tFORI=0TO9 <123> 
60010 H(48+I)=ItH(654-I)=I+10sNEXT <145> 
60020 FORl= 828 TD 938 :READA* <7> 
60030 H=ASC<LEFT*(A*,1>) <234> 
60040 L=A5C<RIGHT*(A*,t)> <253> 
60050 D=H<H>*16+H(L)!S*S+DiP0KEI,D <13> 
60060 A=A+ls IFA<20THENNEXTtA=-l <97> 
60070 READV:Z=Z+lsIFV=STHEN60085 <*77> 
600B0 PRINT"DATAFEHLERt SP>ICg >IN<: SP>lCE> ZEILEt SP>1C 
£J:";60200+ZsEND <39> 
600B5 IFA<0THEN60100 <116> 
60090 S=0:A=0:NEXT <246> 
60100 RETURN <68> 

60201 DATA 20,91,94,20,S4,9D,A9»00,B5,D1,A9,0B,B 

5, D2,1B,A5, Dl ,69,50,85, 2393 <1B9> 

60202 DATA Dl ,A5 T D2,69 f 00,85,D2,CA,D0,FB I 20 f 91 ,9 

4, 20, 84,90,18, A3, Dl, 69, 2831 <3&> 

60203 DATA 02,85,01 ,A5, 02,69,00,85, D2,CA,D0,FO,3 
B,A5,D1,E9,29,85,D1,A5, 3028 <22S> 

60204 DATA D2,E9,00,B5,D2,20,91 ,94,20,84,9D,B6,D 
0,A2,05,A0,04,B1,D1,29, 2532 «£64> 

60205 DATA 0F,C9,06,F0,04,A5,D0,9i ,D1 ,BB, 10, Fl ,1 
B,A5,D1,69,2S,8S,D1,A5, 2636 <2B7> 

60206 DATA D2,69,BB,85,O2,CA,D0 f DF,6B,BB,B0, 138 

7 <162> 

Ende des Listings 



Freuen Sie sich jetzt schon auf die 
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Gomputronic 



Neu für alle Commodore Rechner C 64/VC 20 und £ 1 6 



Auf vielfachen Leserwunsch Haben wir uns entschlossen, unser Druckverfahren für 
Commodore-Listings zu ändern. 

Steuerzeichen sowie alle Grafikzckhen werden zukünftig durch Klartext ersetzt. 
Der Ausdruck ist kompatibel zum bisherigen Druckverfahren, ein neuer Checksum- 
mer ist aus diesem Grund nicht erforderlich. 

Eingabehinweise für alle Commodore Rechner! 

Wer sich schon etwas näher mit den Commodore Rechnern befaßt hat, wird sicher- 
lich wissen, daß der Grafiksatz des C64 sehr viele ähnliche Symbole enthält. Aus die- 
sem Grund ist es oft sehr schwer, einzelne Zeichen, wie zum Beispiel horizontale Li- 
nien, voneinander zu unterscheiden. Besonders macht sich dieser Nachteil in Listings 
bemerkbar, welche die Bildschirmgrafik mit PRINT-Zeilen aufbauen. 
Bisher haben wir in unserem Ausdruck lediglich die Steuersequenzen wie CTRL-RVS 
ON oder CTRL-BLUE durch Klartext ersetzt, ab dieser Ausgabe werden jedoch auch 
alle Grafikzeichen durch ein Schlüsselcode ersetzt. Durch diese Methode sind Ver- 
wechselungen praktisch völlig ausgeschlossen. 

Wie arbeitet unser Klartext? 

Wer schon räch dem alten Verfahren Programme eingegeben hat, wird sicherlich kei- 
ne Schwierigkeiten mit der Umstellung haben. 

Für die neu hinzugekommenen Leser erkläre ich jedoch das Verfahren noch einmal 
grundlegend. 

Alle sogenannten Steuerzeichen (z.B. eine Farbe) sowie ein Grafikzeichen, werden in 
unseren LISTINGS durch ein CODEWORT, welches die Taste bzw. Tastenkombi- 
nation kennzeichnet, ersetzt. Eine Tabelle der Tastenfunktionen finden Sie in jedem 
Tronic-Magazin (z.B. Computronico. Comoute Mit). Das folgende Beispiel zeigt den 
Unterschied zwischen unserem alten und dem neuen Druckverfahren; 

C64 U5TIN0 MIT CHECKSUMMEN iC Vi.O> 

10 REM BISHERIGER AUSDRUCK <11B> 

20 PRIWT'C P0WW4 J| " V <52> 

30 PRINT"*! — -"_( K^" <B5> 

40 PRINT" A •«•**! " <149> 

50 PRINT"ENDE" <246> 
ENDE DES LISTINGS 
[DRUCK: F. B.J 

C-64 LISTINS ♦ CHECKSLMMEN <C Vl.O) 

10 REM NEUER AUSDRUCK 

20 PRINT" C D0HH4 SO CY9 SP*" 

30 PRINT" CM SeSCSDSfSFSGSWSJtSJ SK>" 

AO PRINT" CCA QB QC CD C£_ CP_ CO" 

SO PRINT"ENDE" 

ENDE DES LISTINGS 
CDRUCKiF.B. /0.S.3 



<162> 
<52> 

<BS> 

<149> 

<246> 



Wie in dem Beispiel zu erkennen ist, werden alle Steuerlasten durch die entsprechen- 
de Tastenbeschreibung markiert. Das Wort DOWN steht in diesem Fall für Cursor 
nach unten. Die Zahl dahinter gibt an wie oft die Taste betätigt werden muß. In unse- 
rem Beispiel müßte also die Taste CURSOR abwärts viermal betätigt werden, Die ge- 
naue Beschreibung, welche Taste gemeint ist, entnehmen Sie bitte der Klartext- 
Tabelle, welche am Ende dieser Beschreibung abgedruckt ist. Achtung für Ci6 und 
C64 existieren zwei verschiedene Tabellen! 

Wie ebenfalls aus dem Beispiel zu erkennen ist, werden auch alle Grafikzeichen durch 
einen 2-Buchstaben-Code ersetzt. Der erste Buchstabe ist entweder ein »S« oder ein 
»C«. Das »C« steht für die »COMMODORE TASTE« und das »S* für die »SHIFT 
TASTE«. Der zweite Buchstabe bezeichnet die Aufschrift der Taste. Das »SA* in'un- 
serem Beispiel bedeutet also, daß die Taste SHIFT zusammen mit dem Buchstaben 
»A« betätigt werden muß. »C+« würde bedeuten, daß die Taste COMMODORE zu- 
sammen mit dem PLUS Zeichen gedrückt wird. Wird direkt hinter dieser Buchsta- 
benkombination eine Zahl angegeben, so gibt diese die Anzahl der jeweiligen Zeichen 
an. Das Zeichen COMMODORE Y wurde Jso in unserem Beispiel 9 mal eingege- 
ben. Durch diese Methode entfällt zukünftig das lästige Abzählen von mehrfachen 
Zeichen. 

Sollten Sie einmal nicht wissen, welche Taste gemeint ist, so hilft Ihnen ein Blick in 
unsere Klartext-Tabelle weiter. 

Um im Listing Tastenbezeichnungen von normalen Zeichen zu unterscheiden, wer- 
den alle Tastenkennzekhnungen in geschweifte Klammern' gesetzt. Diese dürfen 
selbstverständlich nicht eingegeben werden. Auch Leerzeichen innerhalb geschweif- 
ter Klammern dienen nur zur Trennung einzelner Tastenfunktionen und dürfen 
ebenfalls nicht eingegeben werden. Um die Tastenfunktionen noch besser hervorzu- 
heben, werden diese in unterstrichener Kursivschrift (Schrägschrift) dargesteflt.AHe 
Zeichen außerhalb der geschweiften Klammern werden normal abgedruckt und auch 
eingegeben. 

Auf den ersten Blick hört sieh das sicher etwas kompliziert an, ist jedoch in der Praxis 
ganz einfach. Wenn man sich erst einmal an die in Klartext geschriebenen Zeichen 
gewohnt hat, wird man den großen Vorteil dieser Schreibweise erkennen. 

Frank Brall 



Noch eine wichtige Anmerkung ! 

Aus technischen Gründen können drei Zeichen von unserm Ausgabegerat nicht ver- 
arbeitet werden. Diese Zeichen sind: Pfeil nach links, engl. Pfund, Pfeil nach oben 

Steht für den Pfeil nach links 

\ Steht für das englische Pfund-Symbol 
A Steht für den Pfeil nach oben 

Ktartext-TabelU für Commodore M und VC 29 



TASTE NEBEN RECHTEN SHIFT 

SHIFT TASTE & TASTE NEBEN 

RECHTEM SHIFT 

SHEFT-TASTE & 2. TASTE GANZ RECHTS OBEN 

SH1FT-TASTE & TASTE GANZ RECHTS OBEN 

2.TASTE VON GANZ RECHTS OBEN 

TASTE GANZ RECHTS OBEN 

TASTE GANZ RECHTS UNTEN 

SHIFT-TASTE 6c TASTE UNTEN RECHTS 

LEERTASTE (GRÖSSTE TASTE) 

FUNKTIONSTASTE Fl 

FUNKTLONSTASTE F2 

FUNKTIONSTASTE F3 

FUNKTIONSTASTE F4 

FUNKTIONSTASTE FS 

FUNKTIONSTASTE H 

FUNKTIONSTASTE ?7 

FUNKTIONSTASTE Fg 

CONTROL-TASTE 8t t 

CONTROL-TASTE & 2 

CONTROL-TASTE «t 3 

CONTROL-TASTE 8c 4 

CONTROL-TASTE et S 

CONTROL-TASTE 8c 6 

CONTROL-TASTE 8t? 

CONTROL-TASTE 6c 8 

CONTROL TASTE & 9 

CONTROL-TASTE tc 

COMMODORE-TASTE ec I 

COMMODORE-TASTE & 2 

COMMODORE-TASTE Sc 3 

COMMODORE-TASTE tc 4 

COMMODORE-TASTE & 5 

COMMODORE-TASTE tc i> 

COMMODORE-TASTE & 7 

COMMODORE-TASTE fc 8 

CONTROL-TASTE UND DAS ... ZEICHEN 

SHIFT-TASTE UND DAS ... ZEICHEN 

COMMODORE-TASTE UND DAS ... ZEICHEN 

SHIFT-TASTE UND SPACE 



Klartcxt-Tabdle für Commodore C 16 und Plus 4 



DOWN 


CURSOR ABWÄRTS 


UP 


CURSOR HINAUF 


CLR 


CLEAR SCHIRM 


INST 


EINFUGEN 


HOME 


CURSOR IN ECKE 


DEL 


DELETE 


RIGHT 


CURSOR RECHTS 


LEFT 


CURSOR LINKS 


SPACE 


LEERZEICHEN 


Fl 


FUNKTIONSTASTE 


F2 


FUNKTIONSTASTE 


F3 


FUNKTIONSTASTE 


F4 


FUNKTIONSTASTE 


FS 


FUNKTIONSTASTE 


F6 


FUNKTIONSTASTE 


F7 


FUNKTIONSTASTE 


F8 


FUNKTIONSTASTE 


BLACK 


SCHWARZ 


WHITE 


WEISS 


RED 


ROT 


CVAN 


TUERKIS 


PURPLE 


PURPUR 


GREEN 


GRÜN 


BLUE 


BLAU 


YELLOW 


GELB 


RVSON 


INVERSE EIN 


RVSOFF 


INVERSE AUS 


ORANGE 


ORANGE 


BROWN 


BRAUN 


LIG.RED 


HELLROT 


DGREY 


DUNKELCRAU 


MGREY 


MITTELGRAU 


LIG.GREEN 


HELLGRÜN 


LIG.BLUE 


HELLBLAU 


HGREY 


HELLGRAU 


CTRL ... 


CTRL-ZEICHEN 


5... 


GRAFIKZEICHEN 


C... 


GRAFIKZEICHEN 


SHJFTSPACE UNSICHTBARER CODE 



DOWN 

UP 

CLR 

INST 

HOME 

DEL 

RiGHT 

LEFT 

SPACE 

FI 

F2 

F3 

F4 

F5 

16 

F7 

F8 

BLACK 

WHITE 

RED 

CYAN 

PURPLE 

GREEN 

BLUE 

YELLOW 

RVSON 

RVSOFF 

ORNG 

BRN 

YL.GN 

PINK 

B1..GRN 

L.BLU 

D.BLU 

L.GRN 

CTRL ... 

S... 

C... 

FLASHON 

FLASHOFF 

SH1FTSPACE 



CURSOR ABWARTS 
CURSOR HINAUF 
CLEAR SCHIRM 

EINFÜGEN 
CURSOR IN ECKE 
DELETE 
CURSOR RECHTS 

CURSOR LINKS 

LEERZEICHEN 

FUNKTIONSTWE 

FUNKTIONSTASTE 

FUNKTIONSTASTE 

FUNKTIONSTASTE 

FUNKTIONSTASTE 

FUNKTIONSTASTE 

FUNKTIONSTASTE 

FUNKTIONSTASTE 

SCHWARZ 

WEISS 

ROT 

TUFRKIS 

PURPUR 

GRÜN 

BLAU 

GELB 

IN VERSE F.IN 

INVERSE AUS 

ORANGE 

BRAUN 

GELBCRÜN 

ROSA 

BLAUGRÜN 

HELLBLAU • 

DUNKELBLAU 

HELLGRÜN 

CTRL-ZE1CHLN 

CRAFIKZEICHEN 

GRAMKZEICHEIM 

BLINKEN EIN 

BLINKEN AUS 

UNSICHTBARER CODE 



TASTE NEBEN INST DEL; RECHTS OBEN 
3. TASTE NEBEN DOWN VON RECHTS OBEN 
TASTE ÜBER RETURN ZUSAMMEN MIT SHIFT 
SHIFT-TASTE & TASTE GANZ RECHTS OBEN 
2. TASTE VON GANZ RECHTS OBEN 
TASTE GANZ RECHTS OBEN 
*. TASTE VON RECHTS OBEN 
5. TASTE VON RECHTS OBEN 
LEERTASTE (GRÖSSTE TASTE) 
FUNKTIONSTASTE Fl (VORHER DEFINIEREN) 
FUNKTEONSTASTE F2 (VORHER DEFINIEREN) 
FUNKTIONSTASTE FJ (VORHER DEFINIEREN) 
FUNKTIONSTASTE F4 (VORHER DEFINIEREN) 
FUNKTIONSTASTE F5 (VORHER DEFINIEREN) 
FUNKTEONSTASTE Ffe (VORHER DEFINIEREN) 
FUNKTIONSTASTE F7 (VORHER DEFINIEREN) 
FUNKTEONSTASTE FS (VORHER DEFINIEREN) 
CONTROL-TASTE Bc 1 
CONTROL-TASTE tc 2 
CONTROL-TASTE 8c 3 
CONTROL-TASTE & 4 
CONTROL-TASTE & 5 
CONTROL-TASTE Bc 6 
CONTROL-TASTE & 7 
CONTROL-TASTE tc 8 
CONTROL-TASTE & 9 
CONTROL-TASTE & 
COMMODORE-TASTE & 1 
COMMODORE-TASTE Sc 2 
COMMODORE-TASTE tc 3 
COMMODORE-TASTE & 4 
COMMODORE-TASTE tc 5 
COMMODORE-TASTE fle 6 
COMMODORE-TASTE 8t 7 
COMMODORE-TASTE & 8 
CONTROL-TASTE UNO DAS ... ZEICHEN 
SHIFT-TASTE UND DAS ... ZEICHEN 
COMMODORE-TASTE UND DAS... ZEICHEN 
CONTROL-TASTE UND "," 
CONTROL-TASTE UND "." 
SHIFT-TASTE UND SPACE 



Computronic 
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Oswald 




äsen 



j fgg 6. 





ssi la 




Ob wir Ostern noch erleben werden? Jäger 
Oswald geht nämlich auf Hasenjagd! Mit 
seiner Donnerbüchse streift er durch den 
Wald und macht vor keinem Hasen halt. 

Leider hat sich der hungrige Jäger im Wald 
verlaufen, was nicht unbedingt ungewöhn- 
lich ist. Neu ist nur die Tatsache, daß Ossi 
sechs Zauberringe einsammeln muß, um 
den Wald wieder verlassen zu können. Da- 
mit noch nicht genug! Zuhause erwartet 
ihn eine Familie, die schon seit Tagen mit 
knurrenden Mägen vor dem leeren Kühl- 
schrank sitzt. Um Zutritt zu den eigenen 
vier Wänden zu bekommen, muß Oswald 
mindestens vier Hasen als Proviant schie- 
ßen. 

Dies ist leichter gesagt als getan, da Ossi auf 
allerhand Tücken im Wald trifft. Sobald er 
mit einer fleischfressenden Pflanze, einer 
Bärenfalle oder gar mit einem Hasen kolli- 
diert, schwindet seine Energie. Die verrin- 
gert sich aber mit der Zeit ohnehin. Jedoch 
kann Ossi seinen Energievorrat wieder et- 
was aufbessern, indem er Hasen zu seinem 
Verzehr erlegt. Hat Jäger Oswald jedoch 
seine Reserven verbraucht, werden er und 
seine Familie verhungern. Mahlzeit! 



rtteill 



1 CLEAR VAL "24875": LOAD ""C 
ODE VAL "24876": LOAD ""CODE VAL 
"26476"; DEF FN a(a)=USR VAL "2 
5722" 

5 READ i,h: DATA SGN PI, VAL " 
7": DIM a$(h+i,h+h); DIH a(h+i) t 
FOR n=i TO h+i: LET a(n)=VAL "1 
e3": LET a$(n)="nobody": NEXT n 

10 CLS : PRINT AT i,h;"Highsco 
retabelle";AT i+PI,i; "name", "sco 
re";TAB VAL "25" ; "stuf e" : FOR n=- 
i TO 8: PRINT AT VAL *'23-n*2",i; 
a$(n) ,a(n) ;TAB VAL "25";n-i: NEX 
T n 

30 INPUT "Geschwindigkeit (0-7 
):";g: IF g>h OR g<NOT i THEN GO 
TO n+PI 
40 CLS : PRINT AT h,VAL "9";"q 
-t Y-P";AT VAL "12", VAL "9";" 
a-g h-Enter": PRINT AT VAL "1 
5" F h; "Schiessen. .Caps-Space" ; AT 

PEEK h,h; "Pause 1";AT VAL " 

19 ",h; "Abbruch. . . .Break" 

50 PLOT VAL "98", VAL "111": DR 
AW VAL "28", VAL "-28": PLOT VAL 
"98". VAL * , 82 ,, : DRAW VAL "28", VAL 
"28": PAUSE NOT i 
100 BORBER i: POKE VAL "23624", 
VAL "79": LET a=FN a{INT g) 

140 BRIGHT i: PAPER i: INK h: L 
ET g=g+i: PRINT AT h+PI ,h; "Game 



Zum Programm: 

Das Programm wurde so geschrieben, daß 
es selbst noch auf dem ZX- Spectrum 16K 
lauffähig ist. Dort wird der Speicher jedoch 




over' 

150 IF a>a(g) THEN PRINT AT VAL 

"13", VAL "5"; "New Highscore" : I 

NPUT "name (max. 14):"; LINE a${ 

g) : LET a(g)-a: GO TO Pl+h 

200 PAUSE VAL "200": GO TO Pl+h 



♦♦+ j .::m2s%#-* 



5 DEF FN a(a$)-CODE a$-48~7* ( 
aä! V9 " ) 

10 FOR n-0 TO 88 
20 READ a$,ch: LET a$=a$+" " 
30 PRINT AT 10,0; "Zeile :";100 
0+n 

40 LET surn=0: FOR 1=0 TO 17 
50 LET a-FN a(a$(l) ) *16+FN a(a 
$(2)) 

70 LET sum=sutn+a 
80 POKE 16384+n*18+l,a 
90 LET a$-a$(3 TO ) 
100 NEXT 1: IF a$<>" " THEN GO 
TO 190 
110 IF chOsum THEN GO TO 200 
120 NEXT n 

150 PRINT "Speicher den M-Code 
nun hinter oswald 1 {Teil 1) " 

160 SAVE "oswald 2"CODE 16384,1 
600 
170 STOP 
190 PRINT 
ng laenge": 
200 PRINT 
210 BEEP 1 



1 "Fehler in der stri 
GO TO 210 

' "Fehler im code" 
.1: STOP 



auch vollständig ausgenutzt (selbst der 
Printerpuffer wird zur Datenspeicherung 
genutzt). 
Zur Eingabe: 

Zuerst gibt man Teil 1 ein und speichert es 
mit SAVE „oswald 1" LINE 1 auf Band. 
Dann gibt man Teil 2 ein und startet es mit 
RUN. Falls keine Fehler bei der Überprü- 
fung durch Checksummen gefunden wer- 
den, wird man nach einiger Zeit aufgefor- 
dert, den ersten Teil des Maschinencodes 
hinter „oswald 1" auf Band zu speichern. 
Mit Teil 3 verfährt man genauso wie mit 
Teil 2. Teil 2 und 3 erzeugen den M-code im 
Bild schirmspeicher, da beim Spectrum 16K 
nicht genügend Platz für den Code und die 
DATA-Zeilen zusammen ist. Nun kann 
man „oswald 1" laden, welches die beiden 
Code-Teile lädt und startet. 
Microdrive-Besitzer sollten - um eine Ver- 
sion auf Catridge zu bekommen - zum ei- 
nen den Spectrum 48K besitzen. Zum an- 
deren eine Kassettenversion nach obiger 
Anleitung erstellen, Teil 4 eingeben, mit 
RUN starten und den weiteren Instruktio- 
nen folgen. 

Viel Spaß! 

1000 DATA "O00103070F1014Ü260E0F 
2F6F83898180400" , 1356 

1001 DATA "05357DE9C40700B0B8ACB 
6B38B3807070301" . 1725 

1002 DATA "03060D01FB78702070FOE 
0C0070F0E040E1E" , 1390 

1003 DATA "3C38FB7C281C3C7870000 
303000102010303", 867 

1004 DATA "FB70F040EOEOC08000000 
1010307O7O330F0" , 1745 

1005 DATA "FAFAFCFCFCF8C0E273366 
D3B0407E0186868" , 2726 

1006 DATA "6A635A380707030507030 
100F8B8B010B8D8" , 1408 

1007 DATA "C0001FOF2A3C1EOEOOOOF 
8F87C3C487C1CO0" ,1288 

1008 DATA "0703030102030100FOBOD 
0C0B0D0E0E00COF" , 1695 

1009 DATA "5F5F3F3F3F1F00008080C 
0E0E0C007181616 " , 1573 

1010 DATA ,, 56C65A1C0347CE6CB6DC2 
0E01F1D0D081D1B" , 1585 

1011 DATA "0300EOEOCOAOEOC080001 
F1F3E3C123E3800" . 1667 

1012 DATA "F8F0543C787000000FODO 
B030DOB0707EOCO" , 1360 

1013 DATA "C08040C0800006074F6F1 
F1C19180O80C0EO" , 1559 

1014 DATA "F0082840000D1D356DCDD 
11C2000A0ACBE97" , 1703 

1015 DATA "23EODF1EOE040EOF0703E 
0E0C080C060B080" , 1929 

1016 DATA "DF3E14383C1E0EO0E0FO7 
02070783C1CDFOE" . 1630 



Computronic 



1017 DATA "OF0207070301COC000804 
08QC0C014141414" ,1203 

1018 DATA "141824243C7E6630183E3 
DBD3F2B6CD830Q0" , 1278 

1019 DATA "000030274648606060042 
828282828183C3C" ,918 

1020 DATA "3C7E7E3C183C5C5C5F2BD 
B6C300000005C1F" ,1273 

1021 DATA "272436363624141414141 
4183C3C3C7E7E3C",889 

1022 DATA "183C3A3AFAD41B360COOO 
0003AF8E4246C6C" , 1541 

1023 DATA "6C2428282828281824243 
C7E663C187CBCBD" ,1313 

1024 DATA "FCD4361B0C0000003CE4D 
212363636102424" , 1323 

1025 DATA "242424182424307E663C1 
8FF3C3C3C3C1824" , 1131 

1026 DATA "66C3C3810000000000002 
42424183C6618FF" ,1194 

1027 DATA "3C2466660000000000008 
1C3C36624163C3C" , 1101 

1028 DATA "3C3CFF183C7E7E3C3C3C1 
824242424240000 ",1095 

1029 DATA "000000006666243CFF187 
E3C182424240000 " , 897 

1030 DATA "00000000011A06766A2C5 
3DBE7D946B7F0D7" , 1759 

1031 DATA "4EB180B09C72661E6965D 
CA1DDCAB636210E" , 2254 

1032 DATA "3ACB19DAE616E8ED56B7B 
12EC7E01EF8CF34" , 2677 

1033 DATA "34343C2C2C2C3C3434BE7 
DAE4A910C0E7F87" , 1456 

1034 DATA "848444380000183C3C180 
000000010285428" , 736 

1035 DATA "10003C0E97A3C5E9733E0 
6060E1D1B9BDE58" , 1558 

1036 DATA "3C70E9C5A397CEFCC0C0E 
27636BCD8581014" , 2684 

1037 DATA "BC8DA3E36A3C183C7EFFF 
FBDD9A1D1A1D1A1",2912 

1038 DATA "522418000103070F1D3D3 
10E80C0E0F0B8BC", 1477 

1039 DATA "6C701B3B77EFCF1F0E31D 
8EC6E76783CD8E6 " , 2303 

1040 DATA "7F7FFBF7F7670300FEFFD 
BDDDEDC88000000 " , 2632 

1041 DATA "00000000000003C922104 
114A3CB38383838", 1121 

1042 DATA "383838383838383838383 
838383838383838" , 1008 

1043 DATA "383838383838383838383 
838383838383838" , 1008 

1044 DATA "383838383838383838383 
838383838383838" , 1008 

1045 DATA "383838383638383838383 
C3C3C3C3C3C3A3A" , 1036 

1046 DATA "3F38383A3C3A3C3838383 
C3C3C3C3C3C3838 ",1051 

1047 DATA "DD2A0B5CDD7E04E6073C4 
721E12E1118FC19",1707 

1048 DATA "10FD224B6DAF21446D772 
37723773D328E5C" , 1644 

1049 DATA "2A4B6D11ES03A7ED52300 
3210100224B6DCD" , 1472 

1050 DATA "D56B21446D7EE6035FCB2 
3347EC6 2F329D65 " , 1953 

*051 DATA ■'1600218C65195E2356D5C 
DCD6C119465010A" , 1544 

1052 DATA "00CD3C20CD9D6BDDE1CDD 
165CD2B66CD1266 " , 2402 

1053 DATA "21406D365823360923AF7 
72377326B5C21EC" , 1447 

1054 DATA "62227B5CCD2E6CCD906C3 



AAE67323E6D2156 " , 1838 

1055 DATA "7522476D21207822496D3 
601233602CD5465" , 1268 

1056 DATA "CD2E68CD2668CD3465CD8 
B68CD541FD2086D" , 2187 

1057 DATA "3A426DFE0620E43A416DF 
E0C38DD11E803CD" , 1985 

1058 DATA ,! C965CD5465CD9D6B21766 
BCDA96BCD9D6BC3" , 2564 

1059 DATA "9E64ED4B4B6DCDA36BCD4 
968CD3968E5E5E5 " , 2664 

1060 DATA "E5E5E5CDD66CE1E1E1E1E 
1E1CD046CCD176C",3217 

1061 DATA "CDA965CD8F69CDDB6ACD9 
E6ACD6467CD0467 " , 2647 

1062 DATA "CD866BC946OE00000E2BA 
C1C160B084C6576",1324 

1063 DATA "656C203016141853434F5 
245 16 16 18CDCD6C" , 1321 

1064 DATA "119E65010BOOCD3C2001F 
0D81EFF2A456D23" , 1582 

1065 DATA "22456DCD2A19D5E5C3301 
A2A456D1922456D" , 1652 

1066 DATA "C9CD58676F260022526DC 
9E52A526D5E237E" . 1889 

1067 DATA "2322526DE60757E119AFC 
506032BCD026623" , 1602 

1068 DATA "CD5F6910F72BC1A720ED2 
B360CC9E51140G0",1960 

1069 DATA "OE04B619CD5F690D20F8E 
1C9210070CD1B66" , 1828 

1070 DATA "2120701140050603E5D5C 
DDB65D1E11910F6",1960 

1071 DATA "C921035B22005B2100002 
2785C76AFED4F11 " , 1358 

1072 DATA "0100010010210070DD7EO 
OFE973875FEB430" . 1570 

1073 DATA "710B360078B1CAFF66CD5 
867FE803845CD78",2262 

1074 DATA "66360D23CD6C66360EC3F 
666D5110D00180A",1507 

1075 DATA "D511OEOD18O4D5110E00C 
501C0FF1808D511 " , 1436 

1076 DATA "0E0DC50180FFE50906027 
EBA2805BB280236 " , 1494 

1077 DATA "00C501C0FFO9C11OEFE1C 
1D1C9CD82660B23" , 2413 

1078 DATA "360078B12851CD8266CD7 
2663614233600CD" , 1698 

1079 DATA "826618381884FECD2804F 
E28200DCD5867E6" , 1936 

1080 DATA "0328013DC608771821FE3 
8201BCD586714E6" , 1502 

1081 DATA "03C60377EBE52A005B732 
37223772322005B" , 1498 

1082 DATA "E1EB18023600DD23230B7 
8B1C244667A3202", 1677 

1083 DATA "5BC9061621A96DDD21215 
8112140C5D50616",1558 

1084 DATA "C5D5E57E6F26002929290 
12C61094F06087E",1407 

1085 DATA "12142310FA0600211C640 
97EDD7700DD23E1 " , 1462 

1086 DATA "23D11CC110D6010A00DD0 
901020009D17BC6 " , 1478 

1087 DATA "205F30047AC60857C110B 
BC3916AE52A785C",1919 

1088 DATA "ED5FADAAA8AEE1C92A476 
DDD21A96D06190E" , 2242 
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5 DEF FN a(a$)=CODE a$-43-7* ( 

5$>"9") 

10 FOR n=0 TO 84 



20 READ a$,ch: LET a$=a$+" " 
3.0 PRINT AT 10,0; "Zeile : " ; 100 
O+n 

40 LET sutn-0: FOR 1=0 TO 17 
50 LET a=FN a(a$(l))*16+FN a(a 
$(2)) 

70 LET gurn-sura+a 
80 POKE 16384+n*18+l,a 
90 LET a$-a$(3 TO ) 
100 NEXT 1: IF a$<>" " THEN GO 
TO 190 
110 IF chOsum THEN GO TO 200 
120 NEXT n 

150 PRINT "Speicher den M-Code 
nun hinter oswald 2 [Teil 2)" 

160 SAVE "oswald 3"CODE 16384,1 
524 
170 STOP 

190 PRINT ""Fehler in der stri 
ng 1 aenge": GO TO 210 
200 PRINT ''"Fehler im code" 
210 BEEP 1.1: STOP 

1000 DATA "190E165E1600DD360Q5C7 
BFE14CAF4671DA7" , 1686 

1001 DATA "280BE521AE67191919CDD 
B67E123DD23CB7C" , 2035 

1002 DATA "28032100700D20D7DD23D 
D23112A00191 100", 1061 

1003 DATA "80ED5238031100701910C 
OC9040200050301" , 1084 

1004 DATA "2A29282E2D2C323130363 
5343A3938504F80" , 1022 

1005 DATA "5380805554804E4D804C8 
0805A58565B5957" , 1782 

1006 DATA "805D8ÜDDE5C5060311EBF 
F7ECB7F2003DD77" , 2340 

1007 DATA "OODD192310F3C1DDE1C9D 
D36 004BDDE5 1 1E8 " , 2429 

1008 DATA "FFDD19DD36004ADD19DD2 
BDD360Q47DD3601" , 1982 

1009 DATA "48DD360249DD19DD36004 
4DD360145DD3602".1633 

1010 DATA "46DDE1C38B672168647EE 
E4577C921C3677E" , 2400 

1011 DATA "EE02773D2377C921B4670 
6041103007EEE01 " , 1486 

1012 DATA "771910F9C93A4D6D3CFE0 
62001AF5F324D6D" , 1713 

1013 DATA "1600216868197E21C0670 
60377233D10FBC9",1434 

1014 DATA "3A3D4340433D2A496D110 
00'619CD5F697EA7",1350 

1015 DATA "28032318F6DD360203DD7 
500DD74011868DD", 1653 

1016 DATA "21035BED4B015BDD5E027' 
BFEFF28D3C51600 " , 1950 

1017 DATA "4BCB23214469195E2356D 
D6EOODD66014678" , 1604 

1018 DATA "FE0728483600E519CD5F6 
97EFE03381 1ED5 2 ",186 1 

1019 DATA "CD5F6979D6033CE603C60 
377D11818D178B9",2127 

1020 DATA "28026B6271CD5269E603F 
E01200ACD5269E6" , 1904 

1021 DATA "0306030077021307500007 
401C1DD23DD23DD" ,2143 

1022 DATA "231098C9DD7E02FE07300 
CES21666BCDA968" , 2026 

1023 DATA "E1DD3602F0DD3402DD7E0 
2FEFF2825ED44CB" , 2460 

.1024 DATA "3F4721C8001132001910F 
D224869C6034711" , 1228 

1025 DATA "14001910FD22426921426 
9CDA96B18B43600" , 1462 

1026 DATA "18B0F4010200ECFF64003 
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F00BFFFC1FF4100" , 2060 

1027 DATA "E52A526D2C22526D26G17 
EE1C9CB7C200FD5 " , 1909 

1028 DATA "110070A7ED52300311008 
019D1C9D51100F0",1716 

1029 DATA "19D1C900020004217969E 
D5B5C6D195E83DD" , 1700 

1030 DATA "77023CDD7705C93EFD110 
0004BDBFE2FE61F",1915 

1031 DATA "201D3EFBDBFE2FE61F201 
A3EDFDBFE2FE61F",2279 

1032 DATA "20183EBFDBFE2FE61F201 
61819113FOOGC18",1309 

1033 DATA "1311BFFF0E02180C11C1F 
F0E031805114100" , 1127 

1034 DATA "0E042A496DCD576AAF772 
3CD576Ä772A496D" , 1710 

1035 DATA "19CD576A7E23CD576AB62 
BCD5F69 A7F52806 " , 2070 

1036 DATA "A7ED52CD5F693601E523C 
D5F693602E12249 " , 2003 

1037 DATA "6DF1200A2A476D19CD5F6 
922476D79A7282E" , 1632 

1038 DATA "0DCB2179323F6DCB21818 
1DD21AE670602DD" , 1846 

1039 DATA "77023CDD77053CDD2B10F 
4323E6DF53A5C6D" , 1835 

1040 DATA "3CE603325C6DF1C37D69D 
D21AC67110000ED" , 1993 

1041 DATA "535C6D3A3E6DC37D69F5C 
D5F697EFE03381E" , 2057 

1042 DATA "FE0A381CFE0C2016E5214 
26D34D511C800CD" , 1792 

1043 DATA "C965D1216E6BCDA96BE13 
600F1C9E5D5C521 " , 2635 

1044 DATA "466BCDA96BCDD26CC1D1E 
1F1C93A5C6DE601 " , 2740 

1045 DATA "C8214E6BCDA96BC93E7ED 
BFE2FE61FC83A43 ,t , 2394 

1046 DATA "6DA7C021566BCDA96B3EO 
A32436DED5B3F6D " , 1973 

1047 DATA "1600CB2321366B194E234 
6ED434E6D234E23" , 1301 

1048 DATA "462A496D09CD5F69225Q6 
D0E0118393A436D" ,1261 

1049 DATA "A7C83D32436D2A506D7E3 
600C8FE0F2818FE" , 1852 

1050 DATA "03381FFEOB281B3607116 
400CDC96521416D",1314 

1051 DATA "3434341806215E6BCDA96 
BAF32436DC90E00" , 1517 

1052 DATA "ED5B4E6D19CD5F697E360 
BFE03380FFE0738" , 1781 

1053 DATA "D07779A720E12A505D360 
FC922506DC93FOO " , 1860 



1054 DATA "OOOOBFFFOOOOC1FF01004 
100010064000200" , 1063 

1055 DATA "1400F401140501006400D 
C0564000400C800",920 

1056 DATA "1405320002006400B6032 
0030200E7FFF401",1130 

1057 DATA "2C010200F6FF6400D0070 
200F6FF14009001" , 1531 

1058 DATA ,, 01002800701701FEF7ED7 
81FD8ED781F30FB" , 1969 

1059 DATA "ED781F38FBED781F30FBC 
9CDAO6B01FFFF0B" , 2577 

1060 DATA "78B12GFBC9D5C5DDE5115 
46D010900EDB02A" , 2315 

1061 DATA "546DED5B566DE5CDB503E 
1ED5B586D19EB2A" . 2386 

1062 DATA "5A6DA7ED52EB20E8DDE1C 
1D1C92 100581 101 ",2372 

1063 DATA "5801FF02364FEDB021004 
011014001FF1736",1404 

1064 DATA "O0EDBO212158110A00061 
63E380E1677230D" , 943 

1065 DATA "20FB1910F6C9213A583A4 
16D014F12CD206C" , 1625 

1066 DATA "0612213B58180921DF593 
A426D014E061120" , 949 

1067 DATA "00A72002OE49713D1910F 
6C9CDCD6C161ACD" , 1721 

1068 DATA "4F6C161BCD4F6C0100Q61 
10E1F3E14181013",838 

1069 DATA "011001110116011990010 
1 1 2AF 1E01C5D5F5 " , 1109 

1070 DATA "ED534C6CC690324E6C114 
56C010A00CD3C20'M584 

1071 DATA "F1D11CC181FE032001AF1 
ODFC950524F5649 " , 2105 

1072 DATA "414E54454E45524749452 
016Q1180052494E" , 1050 

1073 DATA "4745CDCD6C21776C1618C 
DAD6C161D217F6C" , 1769 

1074 DATA "CDAD6C2X8B6C110E1D060 
518041E010608C5", 1107 

1075 DATA "E5D5ED53886C7E328A6C1 
1876C010400CD3C" , 1958 

1076 DATA "20D1E1231CC110E5C93E0 
2C301161E191802",1531 

1077 DATA "1E013A406D0600933007C 
65821416D354632" ,1136 

1078 DATA "406D781730300608E110F 
D21000022406DCD" „ 1365 

1079 DATA "1E6DCD046CCD9D6B217E6 
BCDA96BAFDBFE2F" , 2367 

1080 DATA "E61F20F33E02326B5CED4 
B456DFDCB01AEC9" ,2176 

1081 DATA "01F8A811FFFFC5D5CDAÄ2 



2D1C114CB0B3A40" , 2521 

1082 DATA ,, 6DBA20021E5573057AFE5 
820E7C900005809 " , 1589 

1083 DATA "OOÖOOOOOOOOOOOOOOOOOO 
000000000000101", 2 

1084 DATA "900101002800701700000 
000000000000000", 321 
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5 CLEAR 39999 

10 CLS #: PRINT "Schieben Sie 
ein leeres Catr ige, worauf Sie da 
3 Spiel aufnehmen wollen in Mic 
rodrive 1": GO SUB 1000 

20 SAVE *"m";l;"run" LINE 2000 

30 CLS : PRINT "laden Sie nun 
oswald 2 und oswald 3 von K 
assette" 

40 LOAD "oswald 2 "CODE 40012 

50 LOAD "oswald 3"CODE 41612 

60 PRINT "der M-Code wird nun 
auf Catr ige gespeichert" 

70 GO SUB 100Q 

75 SAVE *"m";li M os Code "CODE 4 
0012,3124 

80 CLS ; PRINT "laden sie nun 
oswald 1 von Kassette mit M 
ERGE ""oswald 1"" nachdem Sie 
dieses Programm mit NEW geloesch 
t haben" 

90 PRINT "dann ersetzen sie in 

Zeile 1 diebeiden LOAD "' CODE 

. . , durch RANDOMIZE USR VAL" 
"40000" "" 

100 PRINT "Dann speichern Sie d 
as Programm mit SAVE * M "m"";l;"" 
oswald"" LINE 1 auf das Catr ige" 
110 PRINT "Um das Spiel dann zu 
laden brauchen Sie nach ei 
nem NEW lediglich RUN einzug 
eben" 

150 STOP 
1000 INPUT "Druecken Sie Enter"; 

LINE a$: RETURN 
2000 CLEAR 39999 

2010 LOAD *"m";l;"os code "CODE 4 
0012 

2050 RESTORE : FOR n=40000 TO 40 
011: READ a: POKE n,a: NEXT n 
2100 DATA 33,76,156,17,44,97,1,5 
2,12,237,176,201 
2150 LOAD *"m";l; "oswald" 
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Kung-Fu Master 
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SäMMIlÄÄi! 



Widerstand mit Menschenhand 

Messer und Sterne haben wir gar nicht gerne! 



tili 



Von allen Seiten flattern erst Messer, dann Sterne auf Sie zu.Zeigen Sie jetzt, was Sie in der Handkante haben, und wehren Sie die Todeswaffen 
ab. Ein absolut genaues Timing ist hier gefragt. 



Zwar hat dieses Programm (nur) zwei Le- 
vel, aber die haben es in sich. Sie werden 
schon sehen, wie schwierig es ist, genau im 
richtigen Moment, nach den gefährlichen 
Gegenständen zu schlagen, um sie abzu- 
wehren. Immerhin müssen Sie mindestens 
50% abwehren, um den ersten Akt zu beste- 
hen. Haben Sie genügend Messer zurück- 
geschmettert, gelangen Sie in den zweiten 
Teil, wo Sternchen auf Sie zukommen. Die- 
se gilt es nun mit einem Stock, in eine ande- 
re Richtung zu bewegen. Haben Sie alles 
gut überstanden, sind Sie der „KUNG-FU 
MASTER" Das Ganze steuern Sie mit Joy- 
stick. Viel Spaß! 

Das Programm unterteilt sich wie folgt: 
1. Teil ist der Lader, 2. Teil das erste Haupt- 
programm (Screen), 3. Teil ist das erste 
Hauptprogramm zum Spielen und der letz- 
te Teil das 3. Hauptprogramm. 
Der erste Teil besteht aus einem Lader, der 
den Screen und das erste Hauptprogramm 
lädt. Der dritte Teil wird vom ersten Haupt- 
programm nach Erfolg nachgeladen. 

Zum Programm: 

Teil 1 abtippen und unter KUNG-FU.BAS 

abspeichern. 

Teil 2 eingeben und mit RUN starten. 

Teil 3 eintippen und unter K-MASTER.- 

BAS abspeichern. 
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SCHNEIDER LISTING MIT CHECKSUMMEN 
V 2.0 



**************** 
*KUNG-FU*MASTER* 
**** ( e ) *by****** 
**L. fi. M. -Soft*** 
**** 1 9B6/ B7***** 
**************** 
***Graphic*by##* 
***M. «Santoro*»* 
***u.*A- Meyer*** 
* **************** 



10 " 

20 ' 

30 ' 

40 ' 

SB ' 

60 ' 

70 ■ 

B0 ' 

90 ■ 

100 

110 s 

120 GOSUB 370 

130 MODE 0:INK 0,24:BORDER 6: IN 

K 2,20: INK 1,10:INK 3,8: INK 4,9 

140 a*a)=CHR*(203>+CHR*(200)sa 

* (2) =CHR*(202) +CHR* (201 ) 

150 LDCfiTE 1,24:PRINT a*(l):PRI 

NT a*(2>;*aX=500sbX=20:GOSUB 28 



160 LDCATE 1,24:PRINT a*(l)sPRI 



iBJ> 
tED> 
CflOJ 
tKNJ 
CEDJ 
tPMJ 
CCE5 
CCF3 
CDL3 
CDJ3 
<EL3 
tGD> 

<DHJ 

CIEJ 



CEBJ 



Teil 4 eintippen und unter K-MASTER2.- 

BAS abspeichern. 

Zum Spielen Teil 1 laden und mit RUN 

starten. 



Achtung: 

In Teil 3 muß in Zeile 3780 der Name des 4. 
Teils geändert werden in K-MASTER2.- 
BAS. 



Die Asse des Kung-Fu Master-Tronics ha- 
ben in ihrem Land einen so hohen Be- 
kanntheitsgrad, daß sie die Computronic 
nur noch in Maskerade kaufen können. 




NT a*<2>;:aX=6B:bX=330:GDSUB 31 

CHB3 

170 a*="KUNG-FU"s LOCATE l,25sPR 

INT a*;sa7.=20:bX=250:GOSUB 340 <BB5 

190 a*="MASTER"s LOCATE 1,25:PRI 

NT a*; : aX=180:bX=200: BOSUB 340 CPEJ 

190 LOCATE 9, 14: PEN 3sPRINT CHR 

$(164>+" by"; CPI> 

280 LDCATE 4, 16: PRINT"L. A.M. - 

Soff* €HD> 

210 LOCATE 3,21: PEN 2sPRINT"Gra 

phic by:"; tFMJ 

220 LOCATE 3,23: PRINT"M- Santoro 

"S CLCJ 

230 LOCATE 3,24: PEN lsPRINT"A. 

Meyer " ; <HH> 

240 LOCATE 4,12:PEN 4sPRlNT a* ( 

1):LDCATE 4,13:PRINT a*C2)sL0CA 

TE 19,12:PRINT a*< I ) ; sLGCATE 19 

,13:PRINT a*<2)s tLM> 

250 LOCATE 1,1 <PL> 

260 LOAD" Ik-screen.bin" {COJ 

270 RUN" !k-ntaster.bas" tKJJ 

2S0 FDR tX=32 TO 5TEP-2:FOR t 

t"/.=0 TO LEN(a*)*B <MCJ 

290 IF TEST(tt7.,tX)THEN PLOT tt 



X,tX,0:PLOT(tty.*2>+aX, (t7.*l„2> + 
b%,l: DRAWR B,0:DRAWR 20-MRND*40 
),-10,2 <BK3 

300 NEXT:NEXT: RETURN CNI1 

310 FOR t7.=0 TO 32 STEP 2s FOR t 
tX=LENta*)*8 TO 5TEP-1 CGCJ 

320 IF TEST<ttX,tX)THEN PLDT tt 
*/. , tX , : PLOT < ttX*2 ) +aX , < t%* 1 . 2 ) + 
b%, 1 : DRAWR-8,0: DRAWR- (20+tRND*4 
0>),10,2 tPO 

330 NEXT:NEXT: RETURN CNH> 

340 FOR tX=0 TO 16 STEP 2: FDR t 
tX=0 TD l_EN(a*>*32 CGH> 

350 IF TEST(tt7.,tX)THEN PLDT tt 
7.,tX,8):PLOT(ttX*2>+aX, <tX*t.2>+ 
b7.,i: DRAWR 4,0: DRAWR 4,0,3 CHG> 
360 NEXTsNEXT: RETURN fAGJ 

370 ' Symbol Stern tCE> 

300 DI M c<S)i RESTORE 440 . CAM> 
390 SYMBOL AFTER 200: MEMORV 199 
90 tMKJ 

400 FOR A=l TO 4s READ a* CIL} 

410 FDR b-0 TO 8*c(b)=VAL(CHR*< 
38>+MID*(a*, <b*2+l> ,2) )=NEXT b tGIJ 
420 SYMBOL c <0> ,c (0) ,c < 1 > ,c (2J , 
c(3) ,c(4) ,c(5) T c<6) ,c(7> tDCJ 
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K*&* 




{LB> 



430 NEXT a:ERASE e: RETURN 
44B DATA 070F1F3E7CF8F060CB,60F 
0F87C3E 1F0F07C9 , 060F 1F3E7CFSF0E 
0CA.E0F0FB7C3E1F0F06CB CQPj 

ENDE DES LISTINGS 




SCHNEIDER LISTING «IT CHECKSUMMEN 
V 2.0 



10 ' Jt******«-»**«.*«»* {BJ> 

20 ' *KUNG~FU*MASTER* {ED> 

30 * w*#**SCREEN*#*#* tNJ> 

40 ' **##*#*#**#***** CKCJ 

50 : CBEJ 

60 GOSUE BBOiMEMDRY 19990 <BCJ 

70 MODE 0-. INK 0,11: INK 4,9: INK 

6,0: INK 7,26: INK 8,15: INK 9,12 fflFJ 

B0 RANDOMIZE TIME fflBJ 

90 a=350:FQR t=0 TD 640 STEP 2t 

IF RND>0.5 THEN a=a+l ELSE a=a- 

1 CLK> 

100 PLGT t,300,4iDRAW t,a {GD> 

IIB NEXT {OfO 

120 WINDOW#0,l t 20,i,2:PAPER#0,I 

0: CLS#0: WINDOW#l , 1 ,2, 3,25:PAPER 

«l,ll£CLSttl:WINDOW*2,i9,20,3,25 

: PfiPER#2 ,11: CLS#2: WINDQW#3, i ,20 

, 19,25: PAPER#3,0:CLS*3 UBJ 

130 DATA 0000000000000000000000 

0000000670000000000000000000000 

00000000000000000000000000 , 0000 

0000000000000000000000000S70000 

0000000000000000000000000000000 

0000000000000 , 00000000000000000 

0000000000068700000000000000000 

0000000000000000000000000000^20 <KG> 

140 DATA 0000000000000000000000 

000000B777000000000000000000000 

000000000000Q0Q00000000000 , 0000 

0000000000000000000006666866609 
0000000000000000000000000000000 
0000000000000 , 00000000000000000 
00000000B6667 777000000000000000 
000000000000000000000000000000Q tLH> 
150 DATA 0000000000000000000000 
000BB66777700000000000000000000 
00000000000000000000000000 , 0000 
0000000000000000000006666777700 

0000000000000000000000000000000 
0000000000000 , 00000000000000000 
0000000088667777000000000000000 

0000000000000000000000000000000 fDP> 

160 DATA 0000000000000000000000 
000B666777700000000000000000000 
00000000000000000000000000 , 0000 
0000000000000000000008866777700 
00000000000000000000000000000Q0 
0000000000000 , 00000000000000000 
00000006B6667777700000000000000 
0000000000000000000000000000000 CFF> 
170 DATA 0000000000000000000000 
06B8QB7777777000000000000000000 
00000000000000000000000000 , 0000 

0000000000000000006666667777777 

7000000000000000000000000000000 
0000000000000 , 00000000000000000 

0000B8BB88877777777770000000000 

0000000000000000000000000000000 £PM> 

180 DATA 000000000000000000008B 
B8888BB777777777700000000000000 

00000000000000000000000000 , 0000 

0008000000000600BBBBBSBBBfi77777 
7777776000000000000000000000000 
0000000000000 , 00000000000000000 
6000888893886777777777776000000 
0000000000000000000000000000000 CflAJ 
190 DATA 0000000000000000006666 
6666666666666666666000000000000 
00000000000000000000000000 , 0000 
000000000000000008998998999B999 
8998700000000000000000000000000 



0000000000000 , 00000000000000000 
0000B9989989998999B998700000000 
0000000000000000000000000000000 {MDJ 
200 DATA 0000000000000000000008 
998988888S8B8BBB770000000000000 
00000000000000000000000000, 0000 
0000000000000000089B889B9998999 
8998700000000000000000000000000 
0000000000000 , 00000000000000000 
000089989989998979899B700000000 

0000000000000000000000000000000 {Np> 

210 DATA 000000000000000000000S 
9989989998999899670000000000000 

00000000000000000000000000 f 0000 

00000000000000060B99899899B8999 
8998707000000000000000000000000 
0000000000000 , 00000000000000000 
0060899S9BB8888B88BB77707000000 

0000000000000000000000000000000 < DL > 
220 DATA 0000000000000000000088 
S88B8B888888BS77777000000B00000 

00000000000000000000000000 , 0000 
0000000000000000B88888686B886B6 
8676770000000000000000000000000 
0000000000000 , 00000000000000000 
80088686B6668876767676770000000 

0000000000000000000000000000000 fJH> 

230 DATA 000000000000000000008B 
686BBB8877777777777000000000000 

00000000000000000000000000 ,0000 

00000000000000ß0B88S8BBBB8 77777 
7777770000000000000000000000000 
0000000000000 ,00000000000000000 
00088BBBBB888777777777770000000 
0000000000000000000000000000000 {AD3 

240 DATA 00000000000000B0B00088 
889988BB77777799777000000000000 
00000000000000000000000000 ,0000 

0000000000000009988997788877779 
9979970000000000000000000000000 
0000000000000 , 00000000000000000 
9997979999997999979999777797000 
0000000000000000000000000000000 O DJ 
250 DATA 0000000000000009997999 
9797777779999997797999997000000 
00000000000000000000000000 1 0000 

0000000009979999997979977977799 

9999977777999997000000000000000 

0000000000000 , 00000000000797979 

9999977797977779999997777979799 

7997770000000000000000000000000 tDH5 

260 DATA 0000000007979977779999 

7979777997979997777799979799797 

97990000000000000000000000 , 0000 

0009999979999797777999997997979 

7979799979799797979797999000000 

0000000000000 , 00000777797977799 

7979797797997979797979799797797 

9799979979797970000000000000000 IBK> 

270 a=40 {ME} 

280 RESTDRE 130: FOR t=l TO asRE 

AD a* tOD> 

290 FOR n=l TQ LEN<a*) (PO> 

300 IF MID*<a*,n,l)="6"THEN PLD 

T 288+rt*4,366~2#t,6 {ÖH> 

310 IF MID*(a*,n,l)= p, 7"THEN PLO 

T 288+n»4,366-2#t,7 {HA> 

320 IF MlD*<a* t n,l)="g»THEN PLO 

T 2SB+n*4,366-2*t,8 {GJ> 

330 IF MID*(a*,n,l)="9"THEN PLO 

T 288+n*4,366-2*t,9 <LKJ 

340 NEXT: NEXT {£K> 

350 DATA 0000000000000000000000 

0000000008B00000000000000000000 

00000000000000000000000000 , 0000 

00000000000000000000000000B8B80 

0000000000000000000000000000000 
0000000000000 , 00000000000000000 
0000000000008876780000000000000 
0000000000000000000000000000000 OLJ 
360 DATA 0000000000000000000000 
00 00000B86B68 000 000000 000000000 
00000000000000000000000000 , 0000 
0000000000000000000000000888788 
0000000000000000000000000000000 



0000000000000 , 00000000000000000 
000000000000SB86680000000000000 
0000000000000000000000000000000 {ENi 
370 DATA 0000000000000000000000 
000000B886760000000000000000000 
00000000000000000000000000 , 0000 

0000000000000000000000007888888 
0000000000000000000000000000000 
0000000000000 , 00000000000000000 
00000000088BBBS8880000000000000 
0000000000000000000000000000000 (PF> 
3B0 DATA 0000000000000000000000 
0B78B88887B8B000000000000000000 
00000000000000000000000000 ,0000 
0000000000000000008BBB8888B7B7B 

0000000000000000000000000000000 
0000000000000 , 00000000000000000 
0000B68887B8B8B7S70000000000000 
0000000000000000000000000000000 {CHI 
390 DATA 0000000000000000000007 
8888887878787000000000000000000 

00000000000000000000000000 T 0000 

000000000000000006888BBB6787887 

0000000000000000000000000000000 

0000000000000 , 00000000000000000 

0000788B8BB6BB88600000000000000 

0000000000000000000000000000000 COA> 

400 DATA 0000000000000000000007 

8888867688670000000000000000000 

00000000000000000000000000 , 0000 

0000B0000000000007S88S66667B670 

0000000000000000000000000000000 

0000000000000 , 00000000000000000 

B0000BB886688788600000000000000 

0000000000000000000000000000000 CKO 

410 DATA 0000000000000000000006 

888B77aB87870000000000000000000 

00000000000000000000000000 ,0000 

0000000000000000066666676667866 

6600000000000000000000000000000 

0000000000000 , 00000000000000000 

0000677777777777777700000000000 

0000000000000000000000000000000 fMJL> 

4Z0 DATA 0000000000000000000006 

6666666666666660000000000000000 

00000000000000000000000000 <jnj 

430 a=22 {MB> 

440 RESTORE 350: FOR t=l TO asRE 

OD a* {KFJ 

450 FOR n=l TO LEN<a*> tPMJ 

460 IF MID*(a*,n,l)="6"THEN PLO 

T 30+n*4,2S6-2*t,6 {AC> 

470 IF MID*<a*,rt,l>-"7"THEN PLO 

T 30+n*4,256-2*t,7 {IPJ 

480 IF MID*(a*,n,l)="B"THEN PLO 

T 30+n*4,256-2*t,e tHAJ 

490 NEXT: NEXT {DQ> 

500 DATA 0000000000000BB0000000 

0000000000000000000000000000000 

00000000000000000000000000 ,0000 

0000000088880000000000000000000 

0000000000000000000000000000000 

0000000000000 , 0000000000087 67BB 
0000000000000000000000000000000 
0000000000000000000000000000000 t I £ } 
510 DATA 000000000008686BB00000 
0000000000000000000000000000000 
00000000000000000000000000 , 0000 

0000000887888000000000000000000 

0000000000000000000000000000000 
0000000000000 , 00000000000866B88 
0000000000000000000000000000000 
0000000000000000000000000000000 (GK> 
520 DATA 0000000000086768890000 
0000000000000000000000000000000 
00000000000000000000000000 , 0000 
000000088888B700000000000000000 

0000000000000000000000000000000 
0000000000000 , 00000000000888888 
8880000000000000000000000000000 
0000000000000000000000000000000 CBGJ 
530 DATA 0000000000088878888887 
8000000000000000000000000000000 
00000000000000000000000000 , 0000 
0000B00B787BBBB8B88a00000B000B0 
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00000000000000000000000000(30000 

0000000 BaataaB , 00000000B007B7BBS 

8678886300000000000018001300008500 
0000000000000000000000000000000 tEI > 
540 DATA 000000000007B7B787BBB8 
8870000000000000000080000000000 
00000000000000000000000000 , 0000 
0000000788787688888860000000000 
0000000000000000000000000000000 
0000000000000 , 0000000000006BSS8 
68Be888700000000000000000000000 
0000000000000000000000000000000 CMNJ 
550 DATA 00000000000076BB676888 
BB700000000000000000000000O0000 
00000000000000000000000000 , 0000 
0000000076876666BB8B70000000000 
0000000000000000000000000000000 
0000000000000 , 0000000000006BB78 
B668BBB000000000000000000000000 
0000000000000000000000000000000 CIO 
560 DATA 0000000000807878BB77B8 
886000 00 00 0000000 0000000 0000000 
00000000000000080000000000 , 0000 
000006666S766678888860000000000 
0000000000000000000000000000000 
0000000000000 , 00000000077777777 
7777777600000000000000000000000 
0000 000000000000 00000000 0000000 CBN > 
570 DATA 0000000006666666666666 
6660000000000000000000000000000 
00000000000000000000000000 CFB> 
5B0 a=22 <NK> 

590 RESTORE 500:FPR t=l TO asRE 
AD a* tIG> 

600 FDR n=l Tu LEN(a*> CNP> 

610 IF MID*<a*,n,l)«"6"THEN PLO 
T 400+n*4,256-2*t,6 CKN> 

620 IF MID*(a*,n,l)= ,, 7"THEN PLO 
T 400+n*4,256-2*t,7 £Gß> 

630 IF MID*(a*,n,l>="8"THEN PLO 
T 400+n*4,256~2#t,8 CEPJ 

640 NEXTiNEXT tGD> 

650 FOR t=0 TO 31 :PEN#1 ,RND*B:P 
RINT#1 ,CHR*(2004-RND*4> ) :PEN#2,R 
ND*B:PRINT*2,CHR*(200+RND*4) ;:N 
EXT CBOJ 

660 a*="KUNG-FU MASTER" CIJ> 

670 L0CATE#3, l,7:PRINT#3,a*; CPP> 
6B0 FOR tX=l TO 16 tIK> 

690 FOR ttX=l TO LEN(a*)*32 CNM> 
700 IF TEST (ttX,t%) THEN PLDT tt 
X,tX,0:PLOT 50+tty.*1.2,370+t"/.*i 
,5,13:DRAWR 2,0 CJF> 

710 NEXTsNEXT CDHJ 

720 PAPER#3,12:CLS#3 CNN} 

730 RESTORE 760 CHP> 

740 FOR 1=0 TO 11:READ a:POKE 2 
0000+i,a:NEXT:CALL 20000 CPJ> 

750 FOR i=0 TO llsREAD a:POKE 2 
0000+i,a:NEXT tFP> 

760 DATA 1,0,64,33,0,192,17,44, 
7B, 237, 176, 201, 1,0, 64, 17, 0,192, 
33,44,78,237,176,201 tJH> 

770 CLS:PRINT"'Achtung Absaven" 
sSAVE" k-5creen.bin" ,b, 20000, 163 
B4+12 CBH> 

7B0 END <EK> 

790 STOP tOF> 

800 * Neue Zeichen CNF> 

810 DXM ctB): RESTORE 870 CIL} 

820 SYMBOL AFTER 200 <PJJ 

B30 FÜR A=l TO 5: READ a* tSN> 

840 FOR b=0 TD B3c(b)=VAL(CHRt( 
38>+MID*<a*, (b*2+l) ,2)>:NEXT b CJL> 
850 SYMBOL c(B) ,c<0) ,c(l) ,c<2>, 
c<3) ,c(4) ,c<5) ,c(6J ,c<7) CAD> 

860 NEXT asERASE c: RETURN <NI> 

B70 DATA B07C12503C11A244C8,7EA 
524247F244299C9,021F442B10AA440 
0CA , 02 1 24C2E59346AB0CB , 040204 1 B 
18204420CC <BC> 

ENDE DES LISTINGS 



♦ ♦♦ Teil 3 ♦>♦ 



SCHNEIDER LISTING MIT CHECKSUMMEN 
V 2.0 



10 ' WWWWWWWWWW -CCJ> 

20 ' ///KUNB-FU MASTER/// CELJ 

30 • //////// (C) ///////// CDGJ 

40 ' ///by L.A.M.-Soft/// CJO> 
50 ' //////////////////// CEJ> 
60 ' /////Hauptteil 1//// CBM} 
70 ' WWWWWWWWWW CIPJ 
80 : <AJJ 

90 : CAIJ 

100 MEMORY 19990:GOSÜB 10000 (KU 
105 GOTO 9000 CEP> 

110 MODE 0iINK 0,11: INK 1 ,0* INK 
5,24: INK 3,6: INK 2, 15: INK 4,9: 
INK 6,0: INK 7,26s INK 8, 15: INK 9 
,21! INK 10,24:INK 13,17: INK 11, 
3: INK 12,14:CALL 20000 UI> 

115 ENV l,100,-l,i:ENT 1,100,-7 
,i:ENT 2,10,-1,1:ENV 2,5,2, 1:EN 
V 4,10,-2,3:ENT-4,4,3,3 CEIJ 

120 st=30iLOCAT£ 1,20 t PEN lsPAP 
ER 12jPRINT"BC0RE: ,, ;3csL0CATE 1 
, 22: PRINT"MESSER: " ; st : LOCATE 1 , 
24:PRINT"TREFFERt ";tr:PAPER CHM> 
130 tr=0sw=0:=c=0:ww=0:wa=0 tHC» 
140 MOVE 250, 200: RESTORE 2310: C 
ALL sprite CMN> 

150 HN=0xa=INTCRND*5>+l:IF a=0 
THEN 150 <MK> 

160 IF a=l THEN aa=144:c:c=54B:6 
OTD 580 CFCJ 

170 IF a=2 THEN aa=144:dd=70sGD 
TO 710 CEA» 

180 IF a=3 THEN bb=18B»ce=540:G 
OTO 840 £PF> 

190 IF a=4 THEN bb=lBB:dd=70iGD 
TO 970 CPEJ 

200 GOTO 150 CPA> 

210 ' Testabfrage CEM> 

220 IF TEST (392, 184) =7 THEN se= 
se+10:GDTO 1100 COBJ 

230 IF TEST (376, 140) =7 THEN sc= 
sc+5:GOT0 1170 CKDJ 

240 SOUND 4,200,10,15,3, 1,15:RE 
TURN CNC> 

250 IF TEST(274,1S4>=7 THEN SC= 
sc+10sGOTO 1230 CAK> 

260 IF TEST (254, 140) =7 THEN sc= 
5C+5:GOTO 1290 <B0> 

270 SOUND 1,200,10,15,3,1,15:RE 
TURN CNKJ 

280 ' Joystick tPGJ 

290 IF PEEK(8<B4F4>=10 THEN ww=l 

:BOTO 340 <BI> 

300 IF PEEK(&B4F4>=9 THEN ww=ls 

EDTO 400 CBAJ 

310 IF PEEK(&B4F4>=6 THEN ww=l: 

GOTO 460 tADJ 

320 IF PEEK(StB4F4)=5 THEN ww=l: 

GOTO 520 *LJ> 

330 RETURN CMG> 

3413 Mann r. Tritt CFO 

350 MOVE 250, 200: RESTORE 2310sC 

ALL sprite <FIJ 

360 MOVE 250, 200: RESTORE 1940:0 

ALL sprite *HD> 

370 GOSUB 210 tOS<> 

380 w=l IHM! 

390 GOTO 330 *AE> 

400 ' Mann r Hand tMG> 

410 MOVE 250, 200: RESTORE 2310s C 

ALL sprite <PLJ 

420 MDVE 250, 200: RESTORE 1560: C 

ALL sprite <U> 

430 GOSUB 210 <GN> 

440 w=2 <HE> 

450 BOTO 330 CBL> 

460 ' Mann 1. Tritt CKLJ 

470 MOVE 250, 200: RESTORE 2310: C 



ALL sprite 

480 MOVE 250,200: RESTORE 3100a C 

ALL sprite 

490 ODSUB 250 

500 w=3 

510 GDTO 330 

520 ' Mann l.Hand 

530 MOVE 250, 200: RESTORE 2310: C 

ALL sprite 

540 MOVE 250,200: RESTORE 2720t C 

ALL sprite 

550 GOBUB 250 

560 w=4 

570 GOTO 330 

5B0 * Messer rechts u. 

590 MOVE cc,aa: RESTORE 3470: CAL 

L sprite 

600 IF ww=l THEN GOTO 630 

610 GOBUB 280 

620 IF wa=l THEN wa=0i tr=tr+i:G 

OTO 670 

630 MOVE cc,aa: RESTORE 3470:CAL 

L sprite 

640 ec=cc-(RND*17+S>*IF cc<=300 

THEN GOTO 660 
650 GOTO 590 

660 SOUND 2,1000,10,15,4,l,l:st 

=st-l:IF 5t<=0 THEN GOTO 1360 

670 IF tr=15 THEN GOTO 3740 

680 GOSUB 1350 
. 690 GOSUB 14S0 
" 700 GOTO 150 

710 * Messer links u. 

720 MOVE dd,aa: RESTORE 3530: CAL 

L sprite 

730 IF ww=l THEN GDTO 760 

740 GOSUB 280 

750 IF wa=l THEN wa=0: tr=tr+l :B 

OTO 800 

760 MOVE dd, aas RESTORE 3530: CAL 

L sprite t 

77B dd=dd+<RND*17+8):IF dd>=300 
THEN GOTO 790 

780 GOTO 720 

790 SOUND 2, 1000, 10, 15, 4, 1,1: st 

=st-l:IF st<=0 THEN GOTO 1360 

B00 IF tr=15 THEN GOTO 3740 

B10 GOSUB 1350 

820 GOSUB 14B0 

830 GOTO 150 

B40 ' Messer rechts o. 

B50 MDVE cc,bb: RESTORE 3470: CAL 

L sprite 
' 060 IF ww=l THEN GOTO B90 

B70 GOSUB 280 

8B0 IF wa=l THEN wa=0i tr=tr+l:G 

OTO 930 

890 MOVE tc, bb: RESTORE 3470: CAL 

L sprite 

900 cc=cc-<RND#17+B> : IF cc<=300 
THEN GOTO 920 

910 GDTO 850 

920 SOUND 2,1000,I0,15,4,l,l-.st 

=st-l:IF st<=2 THEN GOTO 1360 

930 IF tr=15 THEN BOTO 3740 

940 GGBUB 1350 

950 GOSUB 14S0 

960 GOTO 150 

970 * Messer links o. 

980 MOVE dd.bb: RESTORE 3530: CAL 

l_ sprite 

990 IF ww«l THEN GOTO 1020 

1000 GDSUB 2B0 

1010 IF «a=l THEN wa=0:tr=tr+l: 

GGTU 1060 

1020 MOVE dö,bt>: RESTORE 3530: CA 

LL sprite 

1030, dd=dd+(RND*17+B>: IF dd>=30 

THEN GOTO 1050 
, 1040 GOTO 9BB 

1050 SOUND 2,1000,10,15,4,1,1:5 

t=5t-l:IF st<=0 THEN GOTO 1360 

1060 IF tr=I5 THEN GOTO 3740 

1070 GOSUB 1350 



tMN> ! 

iPO> 
CEL> 
CIA> 
{OK> 
COL> 

CKM> 

CHM> 
CEKJ 
tHF> 
<BI> 
{LO> 

<NE> 
tDN> 
<FOJ 

tDK> 

tCDJ 

<BC3 
tBNJ 

tIE> 
{NJJ 
tNF> 
CNAJ 
O^HJ 
CNO 

<FA> 
CDFJ 
{FM1 

CJL> 

CGMJ 

tFIJ 
CBG> 

CMS> 
CIK> 
CMGJ 
CMBJ 
tDB> 
fKD> 

CKLJ 
CIB> 
fGK> 

{JN> 

<BH> 

«JO> 
<BF> 

{AJ> 
{PI> 
tNM> 
<KH> 
CPD> 
<KIJ 

tHF> 
CBCJ 
CBLJ 

tPL> 

tCNJ 

<EJ> 
tCEJ 

<KM> 
CBKJ 
CBJ> 
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1080 GDSUB 14B0 


{AGJ 


6,4,319, 16, 0,8,0, B,-l,t 


{HH} 


1B40 DATA 


555555 




1890 BDTO 150 


{DM} 


1430 GOTO 110 


{CG} 


1555555 




{PI} 


1100 ' Treffer 


{DO 


1440 LOCATE 1,25:PRINT «*; 


{AO 


1B50 DATA 


5555551 




1110 MOVE ee,bb; RESTORE 3470: CA 




1450 FÜR tX=l TD 16:F0R ttX=l T 




115555 




<DHJ 


LL sprite 


{NE> 


LEN(a*>*16 


{JB} 


1B60 DATA 


5555551 




1120 MOVE cc,bb: RESTORE 3670: CA 




1460 IF TEST <ttX,t%) THEN PLDT t 




1555 




{NE) 


LL sprite 


CPD> 


tX , tX , 0: PLOT x X+ttX#2,yX+tX* 1 . 4 




1B70 DATA 


5555551 




1130 SOUND 4,100+cc,2,15,4,l 


CKK> 


, lsDRAWR 2,0:DRAWR 20,30,2 


{JD} 


1555 




{HP} 


1140 MOVE cc,bbi RESTORE 3670: CA 




1470 NEXT:NEXT: RETURN 


CEF} 


18B0 DATA 


5555551 




LL sprite 


{HB} 


1480 ' Mann gerade stellen 


£AOJ 


1555 




{LA> 


1150 bb=bb+3scc=c:c:+B»IF cc>=540 




1490 IF w=l THEN MOVE 250,200: R 




1890 DATA 


555511 




THEN wa=l:GDTO 240 


tKN> 


ESTORE 1940:CALl, i spritesMOVE 25 




1555 




{BO 


1160 GOTD 1120 


tPBJ 


0, 200 j RESTORE 2310: CALL sprite: 




1900 DATA 


2115 




1170 MOVE ec,aa:RESTGRE 3470: CA 




w=0:RETURN 


CEBJ 


511 




{HA} 


LL sprite 


f-MI} 


1500 IF w=2 THEN MOVE 250,200: R 




1910 DATA 


222222 




11B0 MOVE cc,aa: RESTORE 3670: CA 




ESTORE 1560: CALL spritesMDVE 25 




2222 




{EL} 


LL spritz 

1190 SOUND 4,100+cc,2, 15,4,1 


{ED} 


0,200: RESTORE 2310: CALL sprite: 




1920 DATA 


2222222 




{KM} 


w=0: RETURN 


CMO 


22222 




{GFJ 


1200 MOVE cc, aas RESTORE 3670! CA 




1510 IF w=3 THEN MOVE 250,200» R 




1930 ' 




{AQ} 


LL sprite 

1210 aa=aa+3: cc=cc+8i IF cc>=540 


{1E> 


ESTORE 3100: CALL spritesMDVE 25 




1940 DATA 


111 


{PB> 




0,200:RESTDRE 2310sCALL sprites 




1950 DATA 


3 11113 


{HD} 


THEN wa=lsGDTD 240 


{FO 


w=0: RETURN 


{IAJ 


1960 DATA 


333333 


{JE} 


1220 GOTO 1180 


{OK} 


1520 IF w=4 THEN MOVE 250,200s R 




1970 DATA 


3 33311 


{FB> 


1230 MOVE dd,bb: RESTORE 3530s CA 




ESTORE 2720: CALL spritesMOVE 25 




1980 DATA 


3 11222 


{DJJ 


LL sprite 


{DI} 


0,200sRESTORE 2310:CALL sprite 


{FK> 


1990 DATA 


11211 


{NP} 


1240 MOVE dd.bb: RESTORE 3590* CA 




1530 w=0 


{ED} 


2000 DATA 


11221 


{AN} 


LL sprite 

1250 SOUND i,500-dd, 2, 15,4,1 


CAHJ 


1540 RETURN 


(BO 


2010 DATA 


121222 


{68} 


{BMJ 


1550 ' 


(PMJ 


2020 DATA 


12221 


{PMJ 


1260 MOVE dd,bbt RESTORE 3590s CA 




1560 DATA 1 




2030 DATA 


2222 


{ELJ 


LL sprite 

1270 bb=bb+3sdd=dd-BiIF dd<=70 


{EF> 


11 


{BO 


2040 DATA 


22255555 


{LPJ 


1570 DATA 3 3U 




2050 DATA 


5522255555 


{BH} 


THEN wa=l:GQTO 270 


CFA> 


111 


{FI} 


2060 DATA 


5555S5555555 


{NN} 


1280 GOTO 1240 


{PN} 


1580 DATA 3333 




2070 DATA 


55555 1 555522555 


{FO} 


1290 MOVE dd,aa; RESTORE 3530s CA 




333 


{FDJ 


20B0 DATA 


5555551552225555 


CGN} 


LL sprite 


(AU 


1590 DATA 3 311 




2090 DATA 


5555555222255555 




1300 MOVE dd,aa« RESTORE 3570s CA 




111 


CFKJ 


55 22 




{PC} 


LL sprite 

1310 SOUND 1,500-dd, 2, 15,4,1 


CMK> 


1600 DATA 3 111 




2100 DATA 


55555112255 555 




{AN} 


122 


{OEJ 


5222222 




{NQ} 


1320 MOVE dd;aat RESTORE 3590s CA 




1610 DATA 111 




2110 DATA 


55555121555 5 




LL sprite 


tjiy 


211 


{OHJ 


5222222 


„ 


{HA> 


1330 aa=aa+3:dd=dd-8:IF dd<=7B 




1620 DATA 111 




2120 DATA 


551511551 




THEN wa^isGOTO 270 


{BD} 


2212 2 


{GKJ 


1 




{KI} 


1340 GOTO 1300 


CAFJ 


1630 DATA 12 




2130 DATA 


11555551555 


{EP} 


1350 LOCATE 1,20: PEN 1: PAPER 12 




122 222 


{MM} 


2140 DATA 


555111155555 


{JJ} 


iPRINT"SCOREt "sscsLOCATE 1,22:P 




1640 DATA 2 




2150 DATA 


111555155555 




R1NT'"MESSER: *' ; st: LOCATE 1 ,24: PR 




221 22222 


{FGJ 


5 




{CC} 


INT "TREFFER : " ; tr : PAPER : RETURN 


{OGJ 


1650 DATA 555 




2160 DATA 


555551515555 




1360 ' Game over 


{BF} 


222 552222 


{11} 


55 




{DE} 


1370 MODE IjINK 0,26: INK 1,0iIN 




1660 DATA 3555 




2170 DATA 


555551551555 




K 2,15: INK 3,6 


{FE} 


12 5555552 


{BO} 


555 




{AD} 


1380 a*="KUNB-FU MASTER" :xX=B0: 




1670 DAT« 555551 




2180 DATA 


555555555555 




yZ=350:GOSUB 1440 


{CO 


555555555555 


{CS} 


5555 




CIBJ 


1390 a*="GAME BVER"s)(X=150syX=2 




1680 DATA 5555555 




2190 DATA 


55555551 15 




50: GDSUB 1440 


tND> 


55555555551 


{MLJ 


55555 




{DE} 


1400 LOCATE 5, 18: PEN 3sPRINT"SC 




1690 DATA 55155555 




2200 DATA 


5555551 1 




OREs "j sc 


{DA} 


55555551 1 


{Gl} 


555555 




{AH} 


1410 LOCATE 1,23:PRINT" PRES 




1700 DATA 55155555 




2210 DATA 


555551 




S FIRE TO START THE NEW GAME 




55551 1 


{ENI 


15555222 




{JE} 


f 


CCIJ 


1710 DATA 5555555 




2220 DATA 


555551 




1411 RESTORE 1420 


CPD> 


5511 


{fll> 


15522222 




{GC} 


1412 READ tan,dauersIF ton<0 TH 




1720 DATA 555555 




2230 DATA 


555551 




EN RESTORE 1420: GGTD 1412 


CMI1 


515 


{GL} 


11 22222 




{JAJ 


1413 SOUND 1, ton/4, dauer*10, 15, 




1730 DATA 55555 




2240 DATA 


555551 




3:S0UND 2, tan/8, dauer*9, 15,4s SO 




555 


{HDJ 


2222 




{DI} 


UND 4, ton/2, datier «9,15,3 


tOJJ 


1740 DATA 55555 




2250 DATA 


555551 


{EB} 


1414 WH1LE SQ(I) >127jWEND: IF PE 




555 


{PO} 


2260 DATA 


155551 


{PI} 


EK(feB4F4>=16 THEN GOTO 110 


{DBJ 


1750 DATA 11155 




2270 DATA 


2211 


{NH5 


1415 GOTO 1412 


CAEJ 


511 


{AJ> 


22B0 DATA 


22222 


{PK} 


1420 DATA 426,2,319,6,319,2,319 




1760 DATA 51111 




2290 DATA 


222222 


{LH> 


,2,3I9,2,426,2,379,1,35B, 1,319, 




111 


{LM> 


2300 " 




{AI} 


4,319,4,0,4,253,2,319,2,284,1,2 




1770 DATA 55555 




2310 DATA 


1111 


{MO 


53,1,213,3,213,1,213,4,253,3,25 




tili 


CEO> 


2320 DATA 


3 31111 


_ 


3,1,319,2,253,2,213,3,253,1,284 




17B0 DATA 55555 




1 




1HJ} 


,4 


CJD> 


511 1 


{FM> 


2330 DATA 


333333 




1421 DATA 284,8,190,4,213,4,284 




1790 DATA 55555 




.3 ' 




{GQJ 


,4,253,4,213,2,253,2,0,2,213,2, 




1555 


{FM> 


2340 DATA 


3 31221 




253,2,284,1,253,1,319,4,253,4,0 




1800 DATA 55555 




1 




{GP> 


,4,426,3,379,1,319,2,319,2,253, 




1555 


{MA> 


2350 DATA 


3 12222 




3, 253, 1, 213, 2 ,213, 2, 2B4, 2, 284,1 




1810 DATA 55555 




1 




{KC} 


,284,1,379,4,284,6,426,2,319,6, 




55555 


{LL> 


2360 DATA 


11221 




319, 2, 253, 6, 253, 2, 213, B, 319, 3, 2 




1820 DATA S5555 




1 




{FC} 


53,1,213,2,213,2,190,4,213,4 


CHN> 


555555 


{BB> 


2370 DATA 


12222 




1422 DATA 253,3,319,1,213,2,213 




1830 DATA 555555 




1 




{PP> 


,2,213,2,253,2,0,2,319,2,0,2,42 




555555 


{KHJ 


2380 DATA 


12112 





38 



Com putron ic 



w\ 






CQ 


sasr 








® 


1 




CFEJ 


15555 




{MA} 


3250 DATA 


22 5555555222 




2390 DATA 


2222 


fEOJ 


2B30 DATA 


55555555555 




25555555 




CMC} 


2400 DATA 


2222 


CAGJ 


5155555 




{HL} 


3260 DATA 


2222225555 5522 




2410 DATA 


22 


{&I3 


2840 DATA 


1555555555 




1155555 




CGG> 


2420 DATA 


55222 




55555555 




{DM> 


3270 DATA 


22222255 55512 




. 3 




{IA} 


2850 DATA 


11555555 




155555 




CDL} 


2430 DATA 


S555525 




555555135 




{HF}' 


3280 DfiTA 


1 15511 




555 




CMD3 


2B60 DATA 


11555 




5155 




CKH> 


2440 DATA 


55555515 




555555155 




{AP} 


3290 DATA 


5551555 




5555 




CFK? 


2B70 DATA 


115 




5511 




{FPJ 


2450 DATA 


555555551 




55555555 




tco> 


3300 DATA 


55555111 




: 55555 




{FKJ 


2B80 DATA 


51 




1555 




CKE> 


2460 DATA 


5555555555 




5555555 




tCF> 


3310 DATA 


555555155 




155555 




{AN} 


2B90 DATA 


55 




5111 




{FG} 


2470 DATA 


5555555555 




555555 




{NMJ 


3320 DATA 


5555551515 




1S5555 




{PK3 


2900 DATA 


55 




5555 




{LM} 


2480 DATA 


5551555555 




555555 




{FA} 


3330 DATA 


55555515515 




151555 




<NP3 


2910 DATA 


11 




5555 




{El} 


2490 DATA 


5551555555 




555111 




CFB> 


3340 DATA 


555555555555 




511555 




{HM} 


2920 DATA 


11 




5555 




{FA} 


2500 DATA 


S55 1555555 




1H115 




tED> 


3350 DATA 


5555551 1555 




551555 




{DE} 


2930 DATA 


111 




5555 




{PM} 


2510 DATA 


5551555555 




155555 




{HC} 


3360 DATA 


5555551 155 




551555 




tJJJ 


2940 DATA 


1 11 




5555 




{JI> 


2520 DATA 


5551555555 




555555 




CFPJ 


3370 DATA 


22255551 15 




551555 




*JS> 


2950 DATA 


555 




5555 




{DM> 


2530 DATA 


1551555555 




155555 




CCI> 


3380 DATA 


2222255t 15 




551551 




{«DJ 


2960 DATA 


555 




5555 




{EFJ 


12540 DfiTA 


222 155555 




155555 




{DBJ 


3390 DATA 


22222 11 155 




51 222 




CHAJ 


2970 DATA 


5555 




555 




{CH} 


2550 DATA 


22 111551 




555555 




{MF} 


3400 DATA 


2222 155 




:11 22 




{LJ} 


29B0 DATA 


55555 




555 




{BL} 


2560 DATA 


1555115 




555555 




{AP} 


3410 DATA 


1555 




551 




{AH} 


2990 DATA 


55555 




55 




{PJ} 


2570 DATA 


5551551 




5555555 




{PI} 


3420 DATA 


1555 




555 




CLKJ 


3000 DATA 


555555 




51 




{PO} 


25B0 DATA 


5555555 




1555555 




{FQ} 


3430 DATA 


1122 


{EO} 


:555 




{IB3 


3010 DATA 


555511 




3440 DATA 


2222 




2590 DATA 


5555115 




1555555 




{ND} 


2 




{FG> 


555 




{NE} 


3020 DATA 


5551 




3450 DATA 


2222 




2600 DATA 


5555115 




1555555 




CID} 


22 


1 


{LP> 


E55 




CFHJ 


3030 DATA 


5551 




3460 ' 




{AB} 


2610 DATA 


5555115 




1555555 




CCM} 


3470 DATA 


1 


{CA} 


555 




<AL> 


3040 DATA 


5551 




34B0 DATA 


75555111 


{CN} 


2620 DATA 


5555115 




1555555 




(DI} 


3490 DATA 


775555511 


{PN} 


555 




{CG} 


3050 DATA 


5551 




3500 DATA 


755551 1 1 


{LA} 


2630 DATA 


5555115 




1 15555 




{KD} 


3510 DATA 


1 


{BL} 


555 




<KN> 


3060 DATA 


15 




3520 ' 




{AB} 


2640 DATA 


5555115 




5112 




{DE} 


3530 DATA 


1 


{BN} 


555 




{AI> 


3070 DATA 


2222 




3540 DATA 


11155557 


{PM} 


2650 DATA 


5555 HS 




222222 




{JM} 


3550 DATA 


115555577 


CDA} 


555 




{NH} 


30B0 DATA 


22222 




3560 DATA 


11155557 


{AG} 


2660 DATA 


5555115 




2222222 




CHH} 


3570 DATA 


1 


{CB} 


555 




{IC} 


3090 ' 




{PL} 


35B0 * 




{AH} 


2670 DATA 


5555115 




3100 DATA 






3590 DATA 


55 


{PK} 


555 




tMJ) 


111 




{DB> 


3600 DATA 


55 


{CH} 


2680 DATA 


1225115 




3110 DATA 






3610 DATA 


55 


{CE} 


221 




{ME} 


31111 3 




{HJ} 


3620 DATA 


155 


CCB} 


2690 DATA 


2222 2 




3120 DATA 






3630 DATA 


111 


{AD} 


222 




{PL} 


333333 




IHL> 


3640 DATA 


Hill 


£BL} 


2700 DATA 


22222 2 




3130 DATA 






3650 DATA 


111 


{BP} 


2222 




um 


11333 3 




{DL} 


3660 ' 




{PM} 


2710 ' 




<AL> 


3140 DATA 






3670 DATA 


55 


{AE} 


2720 DATA 


1 




22211 3 




{PN} 


3690 DATA 


55 


{BK} 


11 




{PH} 


3150 DATA 






3690 DATA 


55 


{BL} 


2730 DATA 


11 




11211 




{JK} 


3700 DATA 


551 


{PL} 


1113 3 




£KC> 


3160 DATA 






3710 DATA 


111 


{PB} 


2740 DATA 


33 




12211 




UD} 


3720 DATA 


Hill 


{EO> 


33333 




{MH} 


3170 DATA 


2 




3730 DATA 


111 


{PL} 


2750 DATA 


11 




22121 




{MA} 


3740 ' 


- Neu Laden 


{HF> 


1113 3 




{EM> 


3180 DATA 






3750 MDDE 


2JCALL S.BC145PEN li IN 




2760 DATA 


22 




12221 




{MB} 


K 1 ,0: INK 


0,2&(PRINT" 




1111 3 




{KJ} 


3190 DATA 








LADEPROGRÄMM" f 


{JF} 


2770 DATA 


11 




2222 




{LJ} 


3760 PRINTsPRINTsINPUT"WaUen S 




2111 




CBH> 


3200 DATA 


5555 




weiten Tei 


I 1 aden ode 




27S0 DATA 


2 212 




5222 




{AM} 


achmal spielen ?";a 




2111 




{PF} 


3210 DATA 


55555 




* 




{EM} 


2790 DATA 


222 22 




22255 




{LC} 


3764 IF a*="z"THEN GDTO 3770 


{OD> 


121 




{DD} 


3220 DATA 


555555 




3766 IF a*="n"THEN GOTO 110 


{PN} 


2B00 DATA 


22222 12 




55555S 




{LG} 


■ 376B GBTO 


3750 


{PI} 


'22 




(QM> 


3230 DATA 


5552255 




3770 PRINTiPRINTsPP.INTiPRINT"Ie 




2B10 DATA 


222255 22 




55155555 




{NH} 


BI 






2555 




{MG} 


3240 DATA 


55552225 




" 


{PD} 




2B20 DATA 


2555555 2 




51555555 




{HK} 


3775 PQKE 


19995 f sc 


{PD} 



Computronic 



&3> 



&** 



*&* 



3780 RUN" Ik.nnasterZ.bas" CLIJ 

3790 ' CAA3 

9000 PRINT CHR*<22)CHR*(1):LÜCA 

TE 5,25:PRINT"PR£SS FIRE"; sPRIN 

T CHR*(22)CHR*(0);:LOCATE 1,1: W 

HILE jaY(0)<>16:WEND:GQTO 110 tPOJ 

10000 ' MC - CODE tOD> 

10010 sprite=4201B £NJ> 

10020 RESTORE 10110: i=0: k=0:REA 
D a £MP> 

10030 WHILE a<256 CMK> 

10040 PDKE sprite+i,a:k=k+a:i=i 
+1:READ a CEAJ 

10050 IF i MGD BO0 GOTO 10090 CKP> 
10060 IF a=k MGD 256 GOTO 10080 UA> 
10070 PRINT"ERROR. . . "sENO tKFJ 
100B0 k=0:READ a «AN? 

10090 WEND £NB> 

10100 RETURN fON> 

10110 DATA 253,229,221,229,42,4 
2,179,237,152 CEO> 

10120 DATA 91,46,179,25,203,124 
,32,27,215 {FB> 

10130 DATA 203,44,32,23,203,29, 
235,33,34 CLA> 

10140 DATA 199,0,183,237,82,22, 
0,49,3 {IP> 

10150 DATA 15,122,149,99,106,87 
,30,200,39 tMJ> 

10160 DATA 213,24,39,221,225,25 
3,225,201,121 fPN> 

10170 DATA 0,213,125,230,7,203, 
39,203,252 CKH> 

1B1B8 DATA 39,203,39,87,30,0,12 
5,230,241 tGEJ 

10190 DATA 248,111,203,37,203,2 
0,69,77,199 tLPJ 

10200 DATA 203,37,203,20,203,37 
,203,20, 15B tHB> 

10210 DATA 9,25,229,42,40,179,2 
37,75,68 {HO 

10220 DATA 44,179,9,203,44,203, 
29,203,146 fFD> 

10230 DATA 44,203,29,6,0,203,44 
,40,57 {MO 

10240 DATA 20, 203, 29, 36, 32, B, 12 
0,14?,S5 «3J> 

10250 DATA 72,96,104,71,24,15,1 
93,193,0 CIL} 

10260 DATA 221,225,253,225,201, 
203,29,62,139 CGNJ 

10270 DATA 80,149,56,242,79,209 
,25,237,53 CPO 

102B0 DATA 91,201,177,25,17,0,1 
92,25,216 tJD> 

10290 DATA 48,4,17,80,192,25,19 
7,221,16 £MC> 

10300 DATA 225,193,237,91,48,17 
4,62,0,6 «GJ 

10310 DATA 128,40,24,19,19,19,1 
9,19,31 tHMJ 

10320 DATA 26,254,140,32,203,19 
,26,214,146 {LG} 

10330 DATA 32,56,6,19,26,214,32 
,48,177 {DA? 

10340 DATA 244,16,232,65,197,22 
9,19,19,253 £MNJ 

10350 DATA 19,19,19,26,254,140, 
32,174,171 tCMJ 

10360 DATA 19,26,214,32,56,117, 
221,229,146 tFB> 

10370 DATA 193,120,254,0,40,8,1 
9,26,148 {DP} 

103B0 DATA 214,32,56,103,16,248 
,65,24,246 {BC} 

10390 DATA 2,24,217,19,26,214,3 
2,56,78 {CHI 

10400 DATA 90,230,15,203,71,40, 
2,203,86 tPFJ 

10410 DATA 247,203,87,40,2,203, 
231,230,219 CMDJ 

10420 DATA 90,203,79,40,2,203,2 
15,203,11 CBEJ 

10430 DATA 95,40,2,203,199,230, 



85,203,33 ' £IE> 

10440 DATA 39,174,119,19,26,214 
,32,56,167 tPEJ 

10450 DATA 50,230,15,203,71,40, 
2,203,46 {NO 

10460 DATA 247,203,87,40,2,203, 
231,230,219 CDA} 

10470 DATA 90,203,79,40,2,203,2 

15,203,11 tc»y 

104S0 DATA 95,40,2,203,199,230, 
BS, 174,4 CPNJ 

10490 DATA 119,62,248,164,79,35 
,62,7,8 CKDJ 

10500 DATA 164,177,103,16,166,1 
9,26,214,117 CEC} 

10510 DATA 32,48,250,225,1,0,8, 
9,61 CKNJ 

10520 DATA 48, B, 1 ,B0, 192,9,62, 1 
99,87 CGJJ 

10530 DATA 164,103,193,16,140,2 
21,225,253,35 ' fflA? 

10540 DATA 225,201,256,170 tBJJ 

ENDE DES LISTINGS 



♦ ♦♦ Teil 4 -*♦♦ 



SCHNEIDER LISTING MIT CHECKSUMMEN 
V 2.0 



10 ' \\\\\\\\\\\\\\\\\\\\ {CJ3 

20 ' ///KUNG-FU HASTER/// CELJ 

30 ' //////// (ci ///////// {DG} 

40 ' ///by L.A.M.-Soft/// «O} 

50 ' //////////////////// {EJJ 

60 ' /////Hauptteil 2//// tBLJ 

70 ' \\\\\\\\\\\\\\\\\\\\ {IP> 

B0 : {AJ> 

90 ; {All 

100 MEMORY 19990 CDD1 

105 GOSUB 9000 <LLJ 

110 se=PEEK( 19995) {JE} 
128 MODE 0:INK 0,11s INK 1,0: 1NK 
5,24: INK 3,6: INK 2, 15s INK 4,9: 
INK 6,0: INK 7,26: INK 8, 15: INK 9 
,21: INK 18,24: INK 13,17: INK 11, 
3: INK 12, 14s CALL 28888: BORDER 1 

1 tEAJ 
130 ENV 1,100, -1,1:ENT 1,100,-7 
,1:ENT 2,10,-1,1:ENV 2,5,2, 1 i EN 

V 4,10,-2,3:ENT-4,4,3 J ,3 {DB} 
148 tr=0s w=8:b=B; 5t=40ssprite=4 

2018 {LC> 

150 GOSUB 1330 {NJJ 
160 MOVE 200,280: RESTORE 2440s C 

ALL sprite <CE> 

170 IF tr=30 THEN GOTO 1180 {PJ} 

1B0 a=INT(RND*4) {JK> 
190 IF a=l THEN e=560: d=198: GDT 

O 390 {APJ 
200 IF a=2 THEN c=560: d=154:G0T 

O 500 £HLJ 
210 IF a=3 THEN c=560s d=13S:GQT 

O 610 <HJ} 

228 GGTD 170 {AI> 

230 ' Joystick {PH> 

240 IF m<>0 THEN RETURN {EF> 

250 IF PEEK(S<B4F4)=i THEN w=lsG 

OTÖ 720 {AM} 

260 IF PEEK<S<B4F4)=2 THEN w=2:G 

DTO S40 tPMJ 

270 IF PEEK<S<B4F4)=8 THEN w=3sG 

OTO 780 {LJ} 

2B0 RETURN {0A> 

290 ' Test {ABI 

300 IF TEST (368, 198) THEN b=3 {OE} 

310 IF TEST <372, 196) THEN b=3 {NO} 

320 RETURN tMHJ 

330 IF TEST (376, 154) THEN b=3 fKKl 

340 IF TEST (380, 152) THEN b=3 {SMJ 

350 RETURN {NM> 

360 IF TEST (350, 13B) THEN b=3 {AL> 

370 IF TEST (358, 136) THEN b=3 {KU} 

3B0 RETURN {PJ} 



390 ■ Stern oben <POJ 

400 MOVE c,ds RESTORE 2900: CALL 

sprite {KHJ 

410 MOVE c,d: RESTORE 2900: CALL 

sprite {OM} 

420 MOVE cdsRESTGRE 2860: CALL 

sprite {MG} 

430 GGSUB 240i IF b=3 THEN GOTO 

950 fEM> 

440 MDVE c,d:RESTORE 2860: CALL 

sprite {BMJ 

450 e=e~16: IF c<=300 THEN GOTO 

480 {EG} 

468 SOUND 2,600,1,15,4,1,2 CDDJ 

470 GOTO 400 CBH> 

480 5t=st-I:IF st<=0 THEN GOTO 

1050 fDCJ 

490 GOSUB 1330s G05UB 900: GOTO 1 

70 CML> 

500 ' Stern mitte {FE} 

510 MOVE c,d:RESTORE 29B0SCALL 

sprits {MH> 

520 MOVE c,ds RESTORE 2900: CALL 

Sprite {OM} 

530 MOVE c,ds RESTORE 28601 CALL 

sprite {MG> 

540 GOSUB 240i IF b=3 THEN GOTO 

950 <EMJ 

550 MOVE c, dl RESTORE 2860: CALL 

sprite {BMJ 

560 c=c-16:IF c<=300 THEN GOTO 

590 {EA} 

570 SOUND 2,680,1,15,4,1,2 {DD} 

580 GOTO 510 IBB2 

390 «5t=st-lsIF st<=0 THEN GOTO 

1050 (00 

600 GOSUB 1330: GOSUB 980: GOTO I 

70 {LA} 

610 * Stern unten {IP} 

620 MOVE c,d: RESTORE 2900: CALL 
sprite * tMHJ 

630 MOVE c,d: RESTORE 2900: CALL 
sprite {GM> 

640 MOVE C,d:RESTORE 2860s CALL 
sprite {MG> 

650 GOSUB 240: IF b=3 THEN GOTO 
950 {EMJ 

660 MOVE c,d: RESTORE 2860: CALL 
sprite CBM> 

670 c=c-16:IF c<=300 THEN GOTO 
788 {EJ} 

680 SOUND 2,600,1,15,4,1,2 <DD> 
690 GOTO 620 tBH> 

700 st=st-l:XF St<=0 THEN GOTO 
1050 {EN> 

710 gosub 1330: gosub 900: goto 1 

70 <:la> 

728 ' Steck oben CKOJ 

730 MOVE 200, 200; RESTORE 2440 iC 

ALL sprite {GL5 

740 MOVE 200, 2001 RESTORE 1350:C 

ALL sprite CHN5 

750 GOSUB 290 <EA> 

760 SOUND 4,284,20,15,4,2,1 tFFJ 

770 GOTO 2B0 CAK> 

780 * Stack mitte CIP> 

790 MOVE 200,200: RESTORE 2440sC 

ALL sprite tGFJ 

B80 MOVE 200, 180: RESTORE 1748: C 

ALL sprite tJMJ 

B10 BOSUB 330 tGK> 

820 SOUND 4,284,20,15,4,2,1 -<JCJ 

B30 GOTO 2B0 tOF> 

B4e i ■ Stock unten tMFJ 

B50 MOVE 200,200: RESTORE 2440: C 

ALL sprite CKMJ 

860 MOVE 208,200: RESTORE 2050: C 

ALL sprite <NM> 

370 GOSUB 360 CBJJ 

680 SOUND 4,284,20,15,4,2,1 <0M> 

890 GQTO 2B0 CPD? 

900 * Mann stehend tHG> 

910 IF w=l THEN w=0:MDVE 200,20 
0: RESTORE 1350: CALL epriteiMOVE 



<^.0 



CoBnpufporBic 



200,200: REGTORE 2440: CALL spri 




:sc=0:GGTB 120 




CJO} 


22222 




te: RETURN 


tLE> 


B 






1730 ' 




920 IF m=2 THEN w=0shTJvE 200,20 




CIA> 


SCHNEIDER 


1740 DATA 




0: RESTORE 20501 CALL sprite: tIDVE 




1320 RUN"!k-master.bas" 


CKB> 


111 




200,200: RESTORE 2440sCALL spri 




1330 LOCATE 1,20: PEN 1: PAPER 12 




1750 DATA 


3 31 


tes RETURN 


CEI> 


:PRINT"SCORE:";sc: 


LOCATE l,Z2iP 




1111 




930 IF w=3 THEN w=0:MOVE 200, 1B 




RINT"STERNEs";stt LDCATE l,24sPR 




1760 DATA 


333 


0:RESTORE 1740:CALL sprite:MOVE 




INT"TREFFER:";tr: PAPER 0: RETURN 


CFE> 


3333 




200,200: RESTORE 2440: CALL spri 




1340 ' 




CAD} 


1770 DATA 


3 31 


te: RETURN 


tPEJ 


1350 DATA 


1 




1111 




94B IF w=0 THEN RETURN 


CDL> 


11 




CPP> 


1700 DATA 


3 11 


950 ' Treffer 


CIL} 


1360 DATA 


3 311 




1122 




960 5DUND 2,50,10,15,4,1,3 


CK« 


111 


11 


CGE> 


1790 DATA 


11 


970 MDVE c,d: RESTORE 2B60:CALL 




1370 DATA 


3333 




1211 




Sprite 


tMG> 


333 


11 


CMI> 


1B00 DATA 


11 


9E0 MO VE c t d: RESTORE 2860: CALL 




13B0 DATA 


3 311 




12212 




sprite 


CDL> 


111 


LI 


CBF> 


1B10 DATA 


1 


990 MOVE c,d: RESTORE 20605 CALL 




1390 DATA 


3 111 




2122 




sprite 


CBMJ 


122 11 


CCJ} 


1820 DATA 


5 


1000 MOVE c.dsRESTORE 2900sCALL 




1400 DATA 


111 




2221 




sprite 


CAL> 


211 11 




CGFJ 


1O30 DATA 


55 


1010 MOVE c,d: RESTORE 2900: CALL 




1410 DATA 


111 




522 




sprite 


{DG} 


2212 211 




CLA> 


1840 DATA 


555 


1020 c=c+B:d=d+4:IF c>=560 THEN 




1420 DATA 


12 




552 




b=0:GOSUB 900: sc=sc+10s tr=tr+l 




122 222 




CGD} 


1850 DATA 


5555 


:EOBUB 1330: GOTO 170 


{LG} 


1430 DATA 


2 




515 




1030 SOUND 1,2000,10,15,4,1,30 


CLBJ 


221 22222 




CLJ} 


1860 DATA 


55555 


1040 GOTO 980 


CCEJ 


1440 DATA 


555 




1555555522222 




1050 ' Game aver 


{BF} 


222 552222 




COF} 


1870 DATA 


11111111555 


1060 MODE 1:CALL &BC14: INK 0,6t 




1450 DATA 


5555 




15555555522222 


111111111 


BORDER 6s INK 1,26s INK 2,20s INK 




12 5555552 




CÜB} 


1BS0 DATA 


11 111115555 


3,0 


<AM> 


1460 DATA 


555551 




155555555522221 11 1 1 1 1 1 1 


1070 a*="KUNG-FU MASTER" s aX=50s 




55555555S555 




CDJ} 


1890 DATA 


515555 


bX=35BsG0SUB 1140 


CGG1 


1470 DATA 


5555555 




51555555 




10SB a*="GAME OVER" s a7.=30B: b%=2 




55555555551 




{OB} 


1900 DATA 


51555 


B0:GOSUB 1140 


CPCJ 


1480 DATA 


55155555 




551555 




1090 LOCATE 5, 15: PEN 3:PRINT"SC 




555555511 




CBJJ 


1910 DATA 


5555 


ORE; ";sc 


CCP> 


1493 DATA 


55155555 




555555 




1100 LDCATE 1,2S:PRINT" 




5553*111 




CMM} 


1920 DATA 


1555 


FRES5 FIRE TO START AGAIN 




1500 DATA 


5555555 




555551 




r 


CGH} 


551 111 




CHP} 


1930 DATA 


5155 


1110 ORIGrN 400, 150s a=0:FQR t=0 




1510 DATA 


555555 




55S5155 




TO FI STEP 0.02:x=SIN(tt*50sPL 




515 ii 




CFJ> 


1940 DATA 


5511 


DT x,COS<t)*40+a,liDRAWR-2*x-a, 




1520 DATA 


55555 




11115555 




0:a=a-0.4sNEXT 


CEI> 


55511 




CLNJ 


1950 DATA 


55555 


1120 WHILE PEEKCfcB4F4X>i6:WEND 


CIO} 


1530 DATA 


55555 




15155555 




1130 sc=0:GOTO 120 


UO} 


5551 




{AI> 


1960 DATA 


55551 


1140 LOCATE 1,25*PRINT a*; 


CLN> 


1540 DATA 


11155 




55155155 




1150 FOR tX=l TO 16s FDR ttX=l T 




511 




CAEJ 


1970 DATA 


155555 


LEN(a*>*16 


CDI> 


1550 DATA 


51111 




5151 1555 




1160 IF TEST <tt7.,ty.) TUEN PLOT t 




111 




CMLJ 


1980 DATA 


5 1555555 


tX,tX,0: PLOT aX+ttX*2,bX+f/.*2,i 




1560 DATA 


55555 




1 155555 




:DRAWR 2,0:DRAWR 2,0,2 


CNC> 


1111 




CCFJ 


1998 DATA 


225555555551 


1170 NEXTiNEXT: RETURN 


CN« 


1570 DATA 


55555 




555555 




11B0 * Best Game 


cdmj 


511 1 




CMF} 


2000 DATA 


222555555551 


1190 MODE lsCALL &BC14s INK 0,0; 




15B0 DATA 


55555 




555555 




BORDER 0s INK 1,26: INK 2,6: INK 3 




1555 




CCDJ 


2010 DATA 


22215555551 


,15 


CHC> 


1590 DATA 


55555 




155551 




1200 PRINTsPRINTsPEN l:PRINT"Br 




1555 




CGG> 


2020 DATA 


Z2215S555 


avo Sie haben. die Pruefung zum 




1600 DATA 


55555 




12222 




Kung-Fu Master geschafft 




55555 




CAAJ 


2030 DATA 


2221555 


ii 


<IB> 


1610 DATA 


55555 




22222 




1210 PRINTsPEN 2tPRXNT"H£RZLICH 




555555 




CCG> 


2040 ' 




EN GLUECKWUNSCH" 


CCC> 


1620 DATA 


1555555 




2050 DATA 


1 


1220 PRINTsPRINTjPRINTjPEN 3=PR 




555555 




CKH} 


11 




INT"Wollen Sie es noch einmal p 




1630 DATA 


11555555 




2060 DATA 


3 311 


robieren .? Wenn ja dann spule 




1 555555 




CIB} 


111 




n Sie die casette zum ersten Te 




1640 DATA 


115555551 




2070 DATA 


3333 


il zurueck,wenn nein dann 




1 15555 




CLK5 


333 




ii 


CPD} 


1650 DATA 


115555551 




20B0 DATA 


3 311 


1230 PRINT"druecken Sie nur den 




1555 




tEN} 


111 




Feuerknopf und Sie beginnen mi 




1660 DATA 


115555551 




2090 DATA 


3 111 


t diesem Teil von vorne." 


CLK> 


1555 




{HC} 


122 




1240 PRINT;PRINT:PRINT"SCOREs »j 




1670 DATA 


1155555551 




2100 DATA 


111 


scjPRINTsPRINT 


{CK} 


1555 




CEKJ 


211 




euer Anfang 




16B0 DATA 


5555551 




2110 DATA 


111 


euer knöpf "?" ja* -CFBJ 




1555 




CK« 


2212 




1260 IE a*="n"THEN GOTO 1313 


{DI} 


1690 DATA 


55551 1 




2120 DATA 


11 12 


1270 IF a*="f"THEN GQTO 1290 


{11} 


1555 




CHE} 


122 




1280 GOTO 1190 


COB> 


1700 DATA 


2115 




' 2130 DATA 


11 2 


1290 PRINTsPRINTsPEN 3sFR1NT" 




511 




{KCl 


221 




PRESS FIRE 




1710 DATA 


222222 




2140 DATA 


11 555 


S 


CFD} 


2222 




CDF> 


222 




1300 WHILE PEEK(&B4F4K>16:WEND 




1720 DATA 


2222222 




2150 DATA 


I 1 5555 



CFL} 
{AI> 

CDHJ 

CGI} 

CCJJ 

{CK} 

CCN5 

CFA> 

CMK> 

CLK} 

CLL} 

CGNJ 

{CE} 

CAN> 

CHP> 

CKH> 

INJ} 

CQK> 

CFM} 

CPM> 

CBB} 

{JK} 

CAA> 

CO« 

CNBJ 

C8P> 

CDJ} 

{AL> 

{HB} 

CCJ} 

CNF> 

CAI} 
{AH? 

{ED} 

CMP} 

CMC} 

CIB} 

{FG> 

{DG} 

COE} 

CCJ3 

CFN} 

CMG> 






jfip' 



&&* 



■&&* 



w> i 



12 




tPE> 


2222 




way 


2680 DATA 1111 




2160 DATA 


1 155551 




2420 DATA 


2222222 




122222 1 


{CH> 


55 




{FJ} 


22222 




<GH> 


2690 DATA 5111 




2170 DATA 


5115555 




2430 ' 




<PMJ 


112222 1 


{FJ} 


555 




<FG> 


2440 DATA 






2700 DATA 5555 




2180 DATA 


55115555 




1 




<DIJ 


151555 1 


{NJ} 


5555 




{NF} 


2450 DATA 






2710 DATA 5551 




2190 DATA 


55155551 




1 




CEJJ 


555155 1 


{MG} 


55555 




tao 


2460 DATA 






2720 DATA 5551 




2200 DATA 


5555551 




1 




<DG> 


555155 1 


{tlP} 


555555 




{EI} 


2470 DATA 


1. 




2730 DATA 55555 




2210 DATA 


555555 




11 1 




{EG> 


555555 1 


{DN> 


1555555 




CFOJ 


24B0 DATA 


3 311 




2740 DATA 55555 




2220 DATA 


55555 




111 222 




too> 


555555 1 


CKC} 


51555555 




{DFJ 


2490 DATA 


3333 




2750 DATA 55555 




2230 DATA 


55555 




333 222 




{HLJ 


1 15555 1 


{FB} 


551555555 




tP6> 


2500 DATA 


3 311 




2760 DATA 555551 




2240 DATA 


11155 




111 222 




{OD} 


1555 1 


{FP> 


511 55SS55 




tDP> 


2510 DATA 


3 111 




2770 DATA 55551 




2250 DATA 


51111 




122 122 




{CtO 


1555 1 


{FH> 


1 1 1 555522 




tMHJ 


2520 DATA 


111 




2780 DATA 55551 




2260 DATA 


55555 




211 122 




{HF> 


15551 


{FO} 


1111 22222 




{GH} 


2530 DATA 


111 




2790 DATA 55551 




2270 DATA 


55555 




2212 122 




{LH? 


15551 


{IL} 


511 1 2222 




{NC} 


2540 DATA 


12 




2800 DATA 5551 




22B0 DATA 


55555 




122 111 




{NO 


15551 


{JE} 


1555 - 11 




tFI> 


2550 DATA 


2 




2810 DATA 5551 




2290 »ATA 


55555 




221 151 




<BC> 


15151 


{GB> 


1555 11 




tco> 


2560 DATA 


52 




2820 DATA 2111 




2300 DATA 


55555 




22 1151 




{DU 


1221 


{PI} 


55555 1 1 




{F0> 


2570 DATA 


1552 




2830 DATA 22222 




2310 DATA 


55555 




22551115151 




<EIJ 


2221 


{OH} 


555S55 11 




{01} 


25S0 DATA 


15555 




2840 DATA 222222 




2320 DATA 


555555 




52555555151 




{AK} 


22212 


{LK} 


555553 11 




<HG> 


2590 DATA 


15551 




2B50 ' 


{AG} 


2330 DATA 


555555 




5555555511 




{GE> 


2860 DATA 5 5 


{DJ} 


1555555 1t 




{KD* 


2680 DATA 


15551 




2870 DATA 5 


{DD} 


2340 DATA 


5555551 




555555551 




{HLJ 


28B0 DATA 5 5 


{EL} 


115555 11 




{6EJ 


2610 DATA 


15555 




2890 ' 


{AG} 


2350 DATA 


5555551 




155555111 




{AE> 


2900 DATA 5 


{CN} 


1555 11 




{PE> 


2620 DATA 


15555 




2910 DATA 555 


{AE} 


2360 DATA 


5555551 




515551 1 




CNHJ 


2920 DATA 5 


{CL} 


1555 11 




{HB} 


2630 DATA 


1555 




2930 ' 


{AL} 


2370 DATA 


55555551 




551515 1 




{MH> 


9000 MODE 2s PEN liLOCATE l,14sP 




1555 




CEM} 


2640 DATA 


5155 




RINT" 




2380 DATA 


5555551 




555155 1 




<NA> 


PRESS F1RE 




1555 




tKGJ 


2650 DATA 


5515 




"51WHILE 




2390 DATA 


555511 




555155 1 




<NJ> 


PEEK < &B4F4 ) <> 1 6 s WEND ! RETURN 


{IM} 


1555 




<FI> 


2660 DATA 


5551 








2400 DATA 


2115 




555125 1 




{IJJ 






511 
2410 DATA 


222222 


<FG> 


2670 DATA 
111222 1 


1555 


{AC> 


Ende des Listings 




HHBi^BMHHMHH^^^BBBHiM^WHII^HBi 




Unsere Programmierer keifen Ihnen gerne weiter! Die HOTLINE ist unser Leserservice. 
Aber bitte wählen Sie nur die angegebene Nummer und rufen Sie auch nur in der ausge- 
druckten Zeit an. Sie erleichtern damit den anderen Abteilungen des Verlages die Arbeit 
Vielen Dank 

""HOTLINE 

56 51 ■ 3 00 13 Montags - Freitags von 14 - 16 Uhr 
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tfM 



INTODEEPM 




Sie sind im Labyrinth 



Derböse Imperator 'Yollug The Fat' hat Sie, einen harmlosen Raumfahrer,™ die Labyrinthe von Gossum verbannt. Da Sie nicht darum gebeten 
hatten, beschließen Sie, einen Ausbruchsversuch zu starten. Ihre Aufgabe besteht also darin, sich zu einem Transmitter durchzukämpfen, da 
Sie nur so das Labyrinth verlassen können. 
Leider keine einfache Aufgabe, denn allerlei Gewürm versperrt Ihnen den Weg, Sie müssen Mauern wegsprengen und und und... 

Das komplette Labyrinth ist in acht unter- 
schiedliche Levels unterteilt, an deren En- 
de sich jeweils der Transmitter befindet 
(ein grünes, wanderndes Band). Insgesamt 
besteht das Labyrinth aus 128 Räumen, die 
zu durchqueren sind. 
Zu Spielbeginn besteht die Möglichkeit, 
unterschiedliche Schwierigkeitsgrade zu 
wählen (1-4, SELECT-Taste). Mit der OP- 
TION-Taste stellen Sie den Level ein, von 
dem aus Sie starten wollen (1-8). Aller- 
dings können Sie nur von einem Level aus 
losgehen, den Sie irgendwann vorher schon 
einmal erreicht haben. Also anstrengen! 
Ihren Raumfahrer steuern Sie wie gewohnt 
mit dem Joystick. Schießen können Sie mit 
dem Feuerknopf. Steht Ihr Raumfahrer auf 
dem Boden, haben Sie die Möglichkeit, ei- 
ne Bombe zu legen und so Mauern, die Ih- 
nen im Weg stehen, wegzusprengen. Dazu 
müssen Sie kurzzeitig den Joystick direkt 
nach unten ziehen, bis die Bombe er- 
scheint, und dann nichts wie weg...! 
'■ Sollte Ihnen der Raumaufbau ab Level 8 
(Entering Stage n-8...) etwas seltsam er- 
scheinen: Alles Absicht und kein Program- 
mierfebier! Wenn Sie zurückgehen und an 
anderer Stelle herauskommen, als Sie ei- 
gentlich erwartet hatten, nun....(ver)irren 
ist menschlich! 

Mit der Space-Taste können Sie jederzeit 
das Spiel unterbrechen. Weiter geht es, 
wenn Sie den Steuerknüppel bewegen. Mit 
einem Druck auf die Reset-Taste kommen 
Sie wieder ins Startmenü. 
Was sagte noch Yollug The Fat: „Abandon 
Hope All'Ye Enter Here!" 
Folgende Schritte sind zu beachten, um das 
Programm lauffähig zu machen: 
GENERIERUNG AUF DISKETTE 
1.1 Die Programme DEEP1.BAS und 
DEEP2.BAS abtipppen und speichern. 
1 2 Leere, formatierte Diskette bereitlegen. 
1.3 Nacheinander die Programme DEEP1.- 
BAS und DEEP2.BAS starten. Als Antwort 
auf die Frage „Generierung auf Disk oder 
Cassette?" die Taste „D" drücken und nach 
der Meldung „Destination Diskette einle- 
gen, START" die Diskette aus Punkt 1.2 
einlegen und START drücken. Die Reihen- 
folge, in der die Programme gestartet wer- 

Computronic 




I Mit dieser genialen Orientierungsmethode kann mir schon fast nichts mehr passieren! 



den, spielt keine Rolle, da der Maschinen- 
code direkt sektorweise auf die Diskette 
geschrieben wird. Die Basic-Programme 
werden nun nicht mehr benötigt, sollten 
aber für Back-Up-Zwecke aufbewahrt wer- 
den. 

1 .4 Jetzt kann das Spielprogramm gebootet 
werden: 

ATARI 400 (48K)/800: BASIC-ROM ent- 
fernen, Disk einlegen, Computer einschal- 
ten. 

XL/XE: Disk einlegen, beim Einschalten 
des Computers die OPTION-Taste ge- 
drückt halten, bis die ersten Ladegeräusche 
zu hören sind. 
2. GENERIERUNG AUF CASSETTE 

2. 1 Die Programme DEEP1 .BAS, DEEP2.- 
BAS und LINK.BAS abtippen und spei- 
chern. 

2.2 Leerkassette zur Aufnahme verschiede- 
ner Zwischencodes Und Leerkassette für 
das fertige Spielprogramm bereitlegen. 

2.3 Nacheinander die Programme DEEPL- 



BAS und DEEP2.BAS starten. Als Antwort 
auf die Frage „Generierung auf Disk oder 
Cassette?" die Taste „C" drücken und nach 
der Meldung „Cassette einlegen, RE- 
TURN" die Leerkassette für die Zwischen- 
codes einlegen, RECORD und PLAYdrük- 
ken und danach die RETURN-Taste. 
2.4 Nun müssen die beiden Zwischencodes 
noch zu einem lauffahigen Maschinenspra- 
che-Programm zusammengebunden wer- 
den. Dazu das Programm LINK.BAS star- 
ten, Zunächst liest das Programm die Zwi- 
schencodes wieder ein: Nach der Meldung 
„Cassette mit n-tem File einlegen, RE- 
TURN" den Zwischencode, der durch 
DEEPn.BAS erzeugt wurde, einlegen und 
RETURN drücken. Sobald „Leerkassette 
einlegen, RETURN" auf dem Bildschirm 
erscheint, die zweite leere Cassette aus 
Punkt 2.2 einlegen, RECORD und PLAY 
am Recorder drücken und danach die Taste 
RETURN. Nun wird das ablauffähige Spiel 
auf Kassette geschrieben, die anschließend 
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gebootet werden kann: 
ATARI 400 (48K)/800: BASIC-ROM ent- 
fernen, Kassette einlegen, PLAY am Recor- 
der drücken, Computer einschalten und 



währenddessen die START-Taste gedrückt 

halten; nach dem Signalton RETURN 

drücken. 

XL/XE: Kassette einlegen, PLAY am Re- 



corder drücken, beim Einschalten des 
Computers START und OPTION gedrückt 
halten; nach dem Signalton RETURN 
drücken. 




<af> 
<rc> 

<GM> 
<MA> 
<HL> 

<fiP> 
<AM> 



REM *E*«Ä«*f*K***E*Ääet*3K««-»*t*«-*6 



REM » 

REM- *■ 

REM * 

REM * 

REM * 

REM * 



XHTO DEEP 1.0 



von ** 

Frank T. Hittenuayer « 

*t 

REM KlCKKXKK^XiKMMKKMMMK WiHHHt 
<rG> 10 DXM HEX$t2J,CIÖ$t40i,SIüSC48S,PU 
FFER5C64WI28J : PUFFERS C64*128J =" " 
<LD> 20 GRAPHICS O : 5ETCÖL0R 2,8,8:? "■TT! 

87 by Frank T. Wittenwayer" 
<PM> 30 S5EC-1 :ESEC=51 

<DJ> 40 RE5TÜRE 90GIF0R X = l TO 40 i READ A 
:SI05tKa=C»RSCÖ> :NEKT K 

<DD> 50 FOR K = l TO 40;READ A ; CIOS «XI =GHR 
$CA5 :HEKT K 
<KF> lOO GQ5UB 4O0 

<PF> ii© ■» s? "Generierung auf Hisk oder 
Hassette ?*■ 
<CG> 12© CL03E ttl : OPEH ttl J 4 J 9,"K!"!fiET tt 
l„A;CLOSE «l!? 

<KG> 130 IF A=A5CC M D"1 THEH GÜ5UB 500 i EH 
D 

<KH> 
D 

<GC> 
<AK> 
<H'G> 



140 IF A=A5CC"C") THEH GÜ5UB 600 £EH 



ISO GOTO 120 

4©ö 7 :? "Einen Mtmenl bitte. ..":? 

410 puffer=i:for z;ejle=iooo to iooo 

+ CE5EC- 55EC+13 *4-l 

<NI> 420 VERIFY^O 

<KC> 43G FOR H=0 TO 31: READ HEXS : C1=ASC ( 

HEX$C1,D) :C2 = ASC«HEX$C2,23:» 

<EP> 440 A=16*eCCl-4Ö3*«Cl<58J+tCl-S53*« 

C1>04>H tC2~ 4fl3«tC2<5S3 + CC2-5Sl*CC2>645 

<CP> 45G PUFFERS «PUFFERi^CHRStAJ JPUFFER= 

PUFFER+1:UERXFY=UERIFY+A:HEXT X 

<KK> 460 READ A : IF AOVERIFV THEH 7 S? "* 

ÖFEHLER IH ZEILE ";ZEILE;? "Bitte verbes 

sern und Prograw« neu":? "starten! ":ehd 

<PC> 470 7 •■•■•;:HEXT ZEILE:? :RETURH 

<ji> soo 7 "Destination Diskette einlege 

<BK> SlO IF PEEKC53279J <>6 THEH 51© 

<HH> 520 PUFFER=ADRCPUFFER53 :FOR SEKTOR^ 

SSEC TO E5EC 

<HD> 530 ERR=USRCADRt5I0$J ,87, SEKTOR, PUF 

FER» _________ 

<KJ> 540 IF ERR>127 THEH 7 "K ^:fr:*> HE_S<B_R 
fffiIÜ3M«uEai" , :EHD 

<HO> 550 PUFFER=PUFFER+128:NEXT REKTOR 
<HL> 560 RETURH 

<MA? 60O ? "eassette einie_en,|!ll__13____ 1 ': 
OPEH »1,8, 128, "C:" 

<HD> 610 ERR=U5RCADRtCX0$5 ,1,11, ADR CPUFF 
ER5J , CE5EC- S5EC+l>*12ö> 



<BM> 620 IF ERR>127 THEH 7 

<HH> 638 CLOSE «tl: RETURH 

<EE> 900 DATA 104,104,104,141,2,3,104,14 

1,11,3,104,141,10,3,104,141,5,3,104,141, 

4,3,16-9,1, 141,1,3,32,83,223 

<HJ> 91© DATA 173,3,3,133,212,169,0,133, 

213,96 

<K_> 920 DATA 104,104,104,24,10,10,10,10 

,170,104,104,157,66,3,104,157,69,3,104,1 

57,68,3,104,157,73,3,104,157 

<&M) 930 DATA 72,3,32,86,220,132,212,169 

,0,133,213,96 

<AM> 1GG0 DATA öö , 86 , 70 , 45 , 7D , 45 , A9 , 3C , ö 

D,82,D. ,18, öO,A9, 70,85,02 ,85, OC,85,OA,A9 

, 45 , 85 , 03 , 85 , OD , öS , OB , A9 , 00 , ÖD , 2Ö71 

<HP> 1001 DATA 44,02,A9,02, 85, 09, 4C , BS, 6 

F, 00,80,00, OG, 00, 00,00,00, 00, 00,00,00, 00 

,00,00,00,00,00,00,00,00,00,00,751 

<IN> 1002 DATA 00,00,08,00,00,00,00,00,0 

O, 08, 8G, OO, 00, 00, OO, 00, 00, 00, ©8,08, 00, OO 

,00,00,00,00, 00,00,00,00, OO, OO, 

<GM> 1003 DATA 00,00,00,00,00,00,00,80,0 

e,oo, oo,oo,oo,oo,oo,oo, oe, 00,00,00,00,00 

,00,00,00, A5, A6, 38, E9, Ol, 85, 95, 903 

<JB> 1004 DATA A9, OO, 85, 94, A2, ©4, AO,FF, 9 

1, 94,88,DO,FB,E6,95,CA,1Ö,F6,AD,2F,02,09 

, IC, 8D, 2F, 02, A9, 03,8D,1D, DO, A9, 3930 

<DF> 10Ö5 DATA 22 , 8D, 6F , 02, A9, 29, 8D , 26, O 

2,A9,46,8D,27,G2,A9,0O,8D,19,©2,A9,O1,8D 

, 18, 02, 60, EE, E8,4S, AD, E8,4S, 29, 2924 

(0D> 1006 DATA Ol, FO, 09 , 20 , 53, 46, 20, 9D, 4 

6 , 4C , 42 , 46 , 20, EB , 46 , 2G , OC, 62 , 2© ,85 , 6F, 20 

, 3D,62,20,BD,47, A9 , ©1, 35 , 4D, 3D, 2665 

<GÜ> 10O7 DATA 18, 02, 60, A2, Ol, B4, 84, 89, 9 

F,5B, 48,B9jF4,5B,9D,C0,O2,98,OA, A8,B9,49 

, 50,85,80, B9, 4 A, SC, 85, 31, BS, 38, 3846 

<FC> 1008 DATA 9D , OO, DO , BS , SC , 85 , 82 , B5 , 9 

8,85,A7,8A,18,65,A6,85,83,85,A8,A0,1E,A9 

,00,91, A7,88, 10,FB,68, A8 , Bl , 8©, 4219 

<FH> 1809 DATA 91, 82, 88, 10, F9, BS ,8C, 95, 9 

O, CA, 10, B9, 60, A2,03, A3, A6, 38, E9,01,85, 83 

,85, A3, 84,96, B9,9F, SB, 48,98, OA, 4139 

<ID> lOiO DATA A8,B9,49,5C,85,80,B9,4A,5 

C,85,81,B5,9A,9D,O4,D0,B5,9£,85,82,B5,A2 

,85,A7,A0,09,B1,A7, 3D, £7, 46, 91, 4361 

<IF> lOll DATA A7,88,10,F6,68,A8,B1,80,1 

1,82,91,82,88,10,F7,B5,9E,95, A2,CA,10,C2 

,60,FC,F3,CF,3F, A2, 00, BC, CO , 45,4509 

<MM> 1012 DATA B9 , 9F, SB, 48, B9 , F4 , 5B, 9D, E 

0,45, 98, OA, A8,B9,49,5C,85,80,B9,4A,5C,aS 

,81, BD, D3, 45, 85, 82, BD, DC, 45,85,4379 

<FG> 1013 DATA A7, A9 , 36, 85, 83, 85, A8, AO, 1 

4, A9,00, 91, A7, 88,10, FB, 68, A8,B1,80, 91,82 

, 88, 10, F9,BC, DO, 45, B#,9F, 50,48,4244 

<KP> 1Ö14 DATA B9,F4,5B,9D,E4/45,98,0A,tt 

8, B9,49,5C,85,80,B9,4A,5C, 85 , 81 , BD, D8, 4$ 

,85,82, BD, DC, 45,85 , A7,A9, 37, 35,4400 

<FD> 1815 DATA 83 , 85 , A3, AG, 14 , A9,©0, 91, A 
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7,88,10,FB,68,A8,Bl,80,9i,82,88,10,F3,8D 

,D3,4S J 5l>,DC f 4S 1 E8,E0 J e3,B0,e3 J 43fl7 

<JA> 1016 DATA 4C, ED, 46,60, 00, 80, OO, 00, Ö 

0,00,00,00,00,00,00,00,00,00,00,80,00,00 

,00,e0,0O,0G,OG,08,OO,48,8A,ÖA,633 

<II1> 1G17 DATA AA,68,3D,7C,47,38,90,74,4 

7, 9D, 75,47, A3, OO, 9D, 7D , 47, AD, 8C, 47, 90, 84 

, 47, 60, A3, 00, OD, 08, »2, A3, 03,80,3670 

<1_L> 1018 DATA OF, D2 , A2 , G7, A3 , OO , 30, 7C, 4 

7, CA, lfl,FA, 60 ^2,06,60,70, 47, FO,4B,OA,A8 

, B9, 10,48,85, AD, B3, iE, 48, 85, AE, 3710 

<LA> 1819 DATA BS, 33, 48, 85, AF, 83, 34, 48, 8 

5,B0,BC,7D,47,B1,AF,FG,1E,9D.01,D2,B1,AD 

,90, 00, 02, DE, 75, 47, BD, 75, 47,10,4128 

<MK> ±020 OATA 03, BD, 74, 47, 3D, 75 , 47, FE, 7 

0,47, CA, CA, IG, Cl, 60, BD, 84, 47, FO, OB, DE, 84 

,47, A3, 00,90,70,47,40, BF, 47, A3, 3386 

<FH> 1821 OATA OO , 30, 7C,47 , 30, 00, D2, 30 , O 

±,D2,4C,FA,47,49,48,4A,48,53,48,5C,48,60 

,48,7E,48,83,4S,36,48,BB,48,C4,3353 

<HK> 1822 OATA 48, CF, 48, 49, 48, 4E, 48, 57, 4 

8, 64, 48, 75, 48, 80, 48, 8C, 48, A8, 48, BF, 48, C9 

,48,75,48,00,03,04,05,03,02,02,2562 

<LG> 1023 DATA 01,01,00,00,00,00,00,81,8 

2 , 82 , 81 , OO , OF , OF , OE , OE , OO , GO , OC , OB , 88 , 88 

,86,84,84,82,82,81,00,03,0 3,03,1745 

<!>!> 1024 OATA 02, 02, 02, 02, Ol, ÜF, OB, 08, 8 

5, 04, 83, 02, Ol, 00,03,04,02,0 3, 00,0A, 10, 00 

, OC, OB, 0C,00, 10, OA, 24, 26, 28, 28, 337 

<E0> 1025 OATA 28,28,28,26,22,00,05,06,0 

7,05,06,07,04 , 05,06,07,07,07, 08, 08,08,09 

,O9,03,OF,00,0B,0F,0O,OB,OF,OA,418 

<MP> 1026 OATA 08,06,05,04,03,02,02,02,0 

1,01,00,OF,10,11,10,88,87,88,87,00,OA,OC 

,8E, 10, 12, 06, 04, 03, ©2, Gl, 00,03,729 

<L0> 1827 OATA 04, 05, 06 , 07, 08, 09, OA, 20, E 

7, 48, 20, FE, 48, 20, 43, 4C, 20, A8, 47, 20, 94, 4A 

,60, A3, 30,80,07, 04,18,63,04,85, 2381 

<FL> 1028 OATA A6 , 20, E9 , 45, A3, 31, 80, OC* O 

O, A3, 35,85,38, 60, A3,2C, 3D,30, 02, A3, 43, 80 

, 31 , 02, A9,A6, 80, C4,02,A9, 28,80,3544 

<EM> 1029 OATA C5, 02, A9 , A2, 80 , C6, 02 , A3, 7 

4,8D,C7,Ö2, A9,74,8D,F4,82,60, A2,7F,09,G0 

,35,80,CA,10,FB,60,70,70,F0,47,410i 

<DG> 1030 DATA 32, 43, 30 , 42, 4F , 4A , BO, 44, O 

0,80,04,04,04,04,84,04,04,04,04,04,84,04 

, 04,04,04,04, 84, FO, 56, 32, 43, 41, 1320 

<0I> 1031 OATA 2C, 49, 08, 80, OA, 80, 14, 80,1 

E,8O,FO,8ö,FA,80»04,8i,OE,8i,EO,81,EA,81 

,F4, 81, FE, 81, 00 ,80,28, 80, 50,80,3687 

<LH> 1032 DATA 78 , 80, AÖ,80, C8,80, FO, 80, 1 

8, 81, 40,81,68, 81, 30, 81, B8, 81, EO, 81, OÖ,82 

,30, 82, 58, 82, 80,82, AS, 82, DG, 82, 4178 

<DH> 1Ö33 OATA F8, 82, 8G , SO, SO , 80 , 80, A3, A 

E , B4 , AF , 80 , A4 , AS , A5 , BO , 81 , SO , 80 , 80 , 80 , BO 

, ÖO, BF, 80,31,99, 38, 37, 80, A2,B3,4806 

<XX> 1034 DATA 88 , A6 , B2 , AI , AE , AB , 80 , B4 , 8 

E , 80 , B7 , A3 , B4 , B4 , A5 , AE , AD , AI , B3 , AS , B2 , SO 

, 80, 80,80,80, SO, 88,80,80, SO, A8, 4317 

<MB> 1035 DATA A9, B3, A3, AF, B2, AS, 9A, 8«, 1 

0,18,10,10,10,10,00,00,00,00,00,00,00,00 

,0O,0ö,A6,Ai,B2,A5,B7,A5,AC,AC,2769 

<LO> 1036 OATA 80, AI, B4, AI, B2, A3, 80, A6, B 
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2 , AS , AI , AB , BZ , 81 , 80 , A6 , BS , B4 , BS , B2 , AS , 80 

, BO , B2 , AF , A4 , B5 , A3 , B4 , B3 , SO , B7 , 5268 

<IIF> 1037 OATA A3, AC , AC, 88 , A2, A5, 80, A3, A 

D,BO, AC, AS, AD,A5,AE,B4,A5,A4,80,AF, AE,80 

, A3, AF, AD, AO,AF, A4, AF , B2 , AS, SO, 5246 

<PB> 1038 OATA AI, AD, A3 , A7 , AI , 81, 00 , OO, O 

0,OO,00,8O,80„80,8O,8O,A3,AE,B4,AF,80,A4 

,A5, AS, BO, 81, 88,80,80, 80,80,00, 3865 

<FP> 1033 DATA GO, 33, 23 , 2F, 32, 25, 1A , OO, O 

O, 00, OO, OD, 00, 00,00,00, 20,23,26, 25, 33, 1A 

, OD, OD, OD, OG,OG, 00,33,34, 21, 27, 775 

<IO> 1040 DATA 25,1A,OD,OD,GD,OO,O0, A2,G 

3, A9,0O,9D, 65,4 A, CA, DO, FA,AE,AA, 45,30,00 

,FO,OB,CA,FO,G8, A3,OA,3D,65,4A,3114 

<H8> 1041 DATA CA , DO, FA , 60, A3 , 03 , 80, AA, 4 

S, A3, lO, AO, 85, 93, 57, 4 A, 88, 10 , FA, 6G , 20 , IC 

,4B,20,0D,6D,A2,00,BD,ÖA,4B,3D,3352 

<J0> 1042 DATA 4B, 81 , 4C, B7 , 4A, 00 , Gö, A3, G 

0,8D,B5,4A,8D,B6,4A, AD , B5, 4A; 18, 63 , Ol, 80 

,B5,4A, A0,B6,4A,69,00,8D,B6,4A,3384 

<0A> 1043 DATA C9, OB, 90, EB, AO, BS, 4A , C9, B 

8 , 90 , E4 , E8 , E8 , 12 , 90 , CC , 4C , ES , 4A , OO , OO , A9 

,00,8D,E3,4A,80,E4,4A,A0,E3,4A,4505 

<IE> 1044 DATA 18, 69 , Ol , 80, E3, 4A , AD , E4, 4 

A,63,00,80,E4,4A,C9,61,90,EB,AO,E3,4A,C3 

, A3, 30, E4, 60,25, 2E, 34, 25, 32, 29, 3846 

<AÖ> 1045 OATA 2E, 27, 00, 33, 34, 21, 27, 25 , O 

O, 38 , OD, 38, A2, 83, A9,Ö0, 95, 88, 95, 3A, CA, 18 

, F9,6Ö,A9, SB, 80,34,49, A3, 4B,8D, 2818 

<IC> 1046 DATA 35, 49, A2 , 05, BD, 57, 4A, 9D, 6 

3,4B,CA,10,F7,AD, 39, 45 , 18, 63 , Ol , 8D, 3B, 4S 

, AD, 3 A, 45, 80, 33, 45, 20, 00, 60, A3, 3411 

<LH> 1047 DATA OO, 8D , D4 , 45, SD , 05 , 4S, SD, D 

6, 45, 60, 00, 00, 33, 23, 2F, 32, 25, 1A, OD, OD, OD 

, OD, OD, OD, 00,00,00, 00,00,00, 00, 1689 

<MG> 1048 DATA OO, 33 , 25, 2C, 25, 23, 34, OO, 3 

3,34,21,27,25,lA,33,OD,2C,OG,O0,AD,iF,DO 

, C9, 05, DO, 38, 48, 8A, 48, 98, 48, A3, 2153 

<GH> 1049 DATA OO, 8D , SC, 47, A2 , 03, A3, 04, A 

0,00,20,80,47,68, A8, 68, AA, 68, EE,9E, 45, AO 

,3E,45,C3,Ö4,90,05,A9,00,8O J ,3E,3431 

<HC> 1050 OATA 45, AO , 3E, 45 , 18 , 69, 11, 80, 7 

E,4B, AD,1F,DO,C3,05,FO,F3,6O,AD,5E,45,18 

, 63 , 11 , 80 , 7E, 4B , 60 , 20 , 28 , 4B , 20 , 3323 

<KH> 1051 DATA 83, 4B, 20, F3, 4B , AD, 1F, DO, C 

3,06,D0,F3, AD,3E,4 5,8D,3D,45, AD, 3A, 45, 80 

, 35,45, ft3,4F, 80,34,43, A3 , 4A , 80 , 405O 

<CO> 1052 DATA 35 , 43, 60, AD, 1F , DO, C3, 03 , O 

0,3C,48,8A,48,38,48, A3, OO, 80 , 8C, 47, A2, 03 

, A3, 84, AO, 00, 20, 80, 47,68, A8, 68, 3251 

<KF> 1053 OATA AA , 68 , EE, 3A, 45 , AO, 3A, 45 , C 

O,3B,45,30,O5,A9,OO,8D,3A,45,AO,3A,45,18 

,65,11,8D,80,4B,20,46,4B,AD,1F,3503 

<CO> 10S4 OATA 00,C3,03,FO,F3,60,AD,9A,4 

5, 18, 63,11, 80,80,48, 20,46, 4B , SO, AO, OO , B3 

, 9D, 53, 93, OO, 83, B3, 30,54,33,00,3603 

<JF> 1Q5S DATA 89,B9,9D,55,99,QO,8A,B9,9 

0,56,33,00, 8B,B9, 90, 57, 33, 0G , 8C, B3, 90 , 58 

,99,00,80,88,DO,D9,A9,00,85,FC,4136 

<DC> 1056 DATA A3 , 30, 85, FO, A3 , OO, 85, FE, A 

3 , 88 , 85 , FF , A2 , 7F , AO , 00 , A5 , FE , 31 , FC , CS , ÖS 

, FF, 31, FC, AS, FE, 18,63, OC, 85, FE, 5177 

<MM> 1057 DATA AS , FF, 69, OO, 85, FF, A5, FC, 1 
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8 , 69 , 0Z , 85 , FC , A5 , FD , 69 , 00 r 85 , FD , CO , 10 , D8 

<IP> 1058 DATA 65,99,88,91,89^9,65,^,0 
8, 92, SS,iO,EB, 60, 0A, AS,B9,96, 4», ÖS ,FE,B9 
,97,4D,ß5,FF,SA,8A, A8,B9,52,49,4230 
<OG> 1059 DATA 85, FC, 89, 53, 49,85,Fft, «2,0 
5, A8, 89, Bl, FE, 91, FC, 88, 1Ö,F9,Ö5,FE,I8,69 
,OA,85,FE, A5,FF,69,OO,85,FF,A5,4700 
<KE> 1Ö60 DATA FC,16,69,28,S5 J FC,ö5,FD,6 
9, 00, 85, FD, CA, 10, DA, 69, Oft, A3, B9, 00,90,85 
,FA,B9,01,98,85,FB, AÖ,0B,93,48,4246 
<I_H> 1061 DATA AA,B1,FA,20,BE,4C,68,A8,8 
8,1Ö,F3,60, A9,8F,8D, A6,45„ AD, 9C, 45, Oft, A3 
,B9,00,90, 85, FC, 89,01,90, 85, FD, 4224 
<IC> 1062 DATA 20, 66, 4B , Bl , FC, C9 , 04, DO, O 
F, A9, 08, 91, FC, AD, 9C, 45,20,00, 4D , A9,01,20 
, 9E,6D,60, AD, A6,4 5,FÖ,17, AD; OA, 3560 
<JM> 1063 DATA D2 , 29 , OF , 09 , 30 , 8D , 1A , DO , C 
E, A6,45, AD, A6 , 45, DO, 05, A9, OO, 8D, 1A , DO, 60 
, A2,82,Ö5,9E,DD,8B,4D,B0,03,CA,37O5 
<HH> 1064 DATA 18 , F8 , BD, 8E , 4D , SD , 95 , 4D , A 
2, 83, A5,9A,D&,9±,4D,B0,O3,CA, 18,F3,8A,18 
, 6D,95,4D, A3, 68, 40, 70, A0,00,04, 3712 
<FK> 1865 DATA 08, 30, 58, ÖO, A3, OO, B4, 4D , F 
fl,4l>,2C,4E, 63, 4E, A4 , 4E , EO , 4E , IC , 4F , 58 , 4F 
,94, 4F, DO, 4F,OC, 50, 43, SO, 84, 50,3106 
<EH> 1Ö66 DATA CO , 58 , FC .. 58 , OO , ÖO , OO , ÖÖ , Ö 
0,00,00,00,00,00,00,00,00,00,00,00,80,00 
, OO, OO , 80 , OO, OO, 00 , 00 , 00, OÖ , OO , 604 
<JX> 1Ö67 DftTft 08,00,00,00,00,00,00,00,0 
0,80,00,00,00,00,00,08,00,00,00,00,00,00 
,00,00,00,00,00,00,00,08,00,00,0 
<BN> 1068 DATA El, E2, ES, E4, ES, El , E2, E3, E 
4,E5,E6,E7,E8,E9,EA,E6,E7,E8,E9,EA,EB,EC 
, ED,EE,EF J EB,EC,ED,EE,EF,El,E2,74ii 
<CG> 1069 DATA E3, E4 , ES, El , E2 , E3, E4 , ES, E 
6,E7,E8,E9,EA,E6,E7,E8,E9,EA,EB,EC,ED,EE 
,EF,EB,EC,ED > EE,EF,Ei,E2,E3,E4,7415 
<CM> 187Ö DATA E5 , 08 , OO, OO , OO, 00, E6, E7 , E 
8, E9,EA,O0 J 0O,O0,eO,0O,EB,EC,ED,EE,EF,O0 
,OO,8O,80,OO,E1,E2,E3,E4,E5,OO,37O9 
<KA> 1071 DATA 00,0O,OÖ,OO,E6,E7,E8,E9,E 
A, 00,00,00, 00, 00,EB,EC, ED, EE, EF, 00,00,00 
,00,00,00,74,80,80,00,00,00,00,2461 
<CE> 1872 DATA 00,00,00,74,00,00,00,00,0 
0,00,00,00,00,74,00, 80,00,00, 00,00,08,00 
,00,74,00,00,00,08,00,00,00,00,348 
<CK> 1073 DATA OO, 74 , 00, OO , OO , 00, OO, OO, O 
0,00,00,74,00,00,08,00,00,00,00,00,00,00 
, 00 , OO , 70 , 71 , OO , OO , OO , OO , OO , O0 , 457 
<DF> 1874 DATA 00,08,78,71,00,00,08,08,0 
0,00, 08,00,70,71,00,00,00,00,00,00,00,00 
,70,71,00,00,00,00,00,08,00,00,675 
<DI> 1Ö75 DATA 70,71,00,00,00,00,00,00,0 
0,00, 70, 71,00,00,00,00,00,00,44,00,00,00 
,08,00,00,00,00,00,00,44,00,00,586 
<HP> 1076 DATA 45,00,00,00,00,00,00,00,4 
5,45,46,44,45,00,00,00,00,00,46,00,44,45 
,44,44,00,80,00,00,44,45,00,00,894 
<BD> 1077 DATA 44,00,00,00,00,00,88,00,0 
0,00,00,44,00,00,00,00,80,00,00,00,00,00 
,00,00,00,00,00,00,00,00,00,00,136 
<HF> 1078 DATA 00,40,41,40,41,40,41,48,4 



l,GO,El,E2,E3,E4,E5,Ei,E2,E3,E4,E5,E6,E7 

,E8,E9,EA,E6,E7,E8,E9,EA,EB,EC,5577 

<OH> 1079 DATA ED , EE , EF , EB , EC , ED , EE , EF , O 

0,00,00,00,00,80,00,00,00,00,42,43,42,43 

,42,43, 42,43,F2,F3, 00, OO, 00,00, 2916 

<JD> ±000 DATA 00,80,00,00,08,00,00,00,0 

8,00,00,00,00,00,00,00^00,00,00,00,00,00 

,00,00,00,00,00,08,08,00,80,00,0 

<FK> 1081 DATA 00,00,00,80,00,00,00,00,0 

O, 80 , B8,F5, 08, 00, 08, OO, 00,00,80,00, 00, F6 

, ÖO, 00, OO, 00,00,00,00, 08, 00,F7, 738 

<FD> 1Ö82 DATA 80 , 00, 00 , 00, OO, OO, 00, OO, O 

O,F8,0O,0O,OO,00,aO,OO,O0,08,0O,F9,OO,OO 

,00, 00, OO, O0,0O, 00,00,78, 80,00,620 

<BC> 1033 DATA 00, OO , OO , 08, OO , El, E2 , E3, E 

4,E5,8O,OO,O0,O0,OO,E6,E7,E8,E9,EA,GO,0O 

,0Ö,80,0O,EB,EC,E»,EE,EF,Ö0,OO,348O 

<EF> 1084 DATA 00, OO, OO , El, E2, E3, E4 , ES, O 

O, 00, 0O, 08, OO, E6,E7,E8,E9,EA, 00,00,08,00 

,80,EB,EC,ED,EE,EF,55,47,48,49,3781 

<BL> 1085 DATA 4A, 55, 47, 48, 49, 4A, 4B , 4C, 4 

D,4E,4F,4B,4C,4D,4E,4F, SO, 51, 52,53,54,50 

, 51, 52, 53, 54, 55, 47, 48, 49, 4 A, 55, 2499 

<KJ> 1086 DATA 47 , 43, 49, 4A, 4B, 4C, 4D , 4E, 4 

F,4B,4C,4D,4E,4F,5O,51,52j,53,54,50,5i,52 

,53,54,00,00,00,00,00,00,00,00,1880 

<CF> 1087 DATA 00,00,00,00,00,08,88,00,0 

0,00,80,00,00,00,00,00,00,00,00,08,00,00 

,E1,E2,E3,E4,ES,E1,E2,E3,E4,E5,2270 

<HD> 1088 DATA E6 , E7, E8 , E9, EA , E6, E7 , E8 , E 

9,EA,EB,EC,ED,EE,EF,EB,EC,ED,EE,EF,55,47 

,48,49,4A,88,8O,8O,0O,O0,4B,4G,5216 

<EG> 1089 DATA 4D , 4E, 4F , OO, 80, OO, 00 , 00, 5 

0,51,52,53,54,00,00,00,08,00,55,47,48,49 

, 4 A, 08 , 00,80,00, 00, 4B,4C,4D,4E, 1325 

<JP> 1090 DATA 4F, 00,08,00, 00, 00,50,51, 5 

2,53,54,00,00,00,00,80,00,00,00,08,00,55 

, 4 7, 48, 49, 4A, 80, 00, 00, 88,00,4B,939 

<DL> 1091 DATA 4C, 4D, 4E, 4F , OO, 08, 88 , 00, 

0,50,51,52,53,54,00,00,08,00,80,55,47,48 

, 49, 4A, 00, 00,00,00, OO, 4B,4C,4D, 1323 

<K0> 1092 DATA 4E , 4F , 88 , 0O , OO , 00 , OO , 50 , 5 

1,52,S3,54,E1,E2,E3,E4,E5,E1,E2,E3,E4,E5 

,E6,E7,E8,E9,EA,E6,E7,E8,E9,EA,5157 

<MH> 1093 DATA EB, EC, ED, EE, EF, EB, EC, ED, E 

E , EF , OO , 00 , 00 , OO , 00 , OD , OO , OO , OO , OO , OO , 00 

,00,00,00,00,00,08,80,08,00,00,2370 

<KE> 1894 DATA 88, 88, OO, 80, 00, OO, OO, OO , E 

E , CA , 45 , AD , C A , 45 , 29 , Ol , DO , 03 , EE , C9 , 45 , 20 

, 2C, 53,20, 42, 53, 20, 55, 51, 20, 1D, 2313 

<IF> 1095 DATA 52 , 28, Di, 52, 60, AD, C9, 45 . 2 

9,lF,OA,A8,B9,99,51,85,FE,B9,9A,51,85,FF 

, AO , OF , Bl , FE , 99 , OO , 72 , 88 , iO , F8 , 4081 

<BE> 1096 DATA A2 , 06 , 20, 88, 53 , 90, 21, AD , C 

9,45,29,lF,C9,O6,D0,18,48,8A,48,9S J 48,A9 

,01,8D,8C,47, A2,03, A9,Ö9,A0,O3,3O7Ö 

<GK> 1097 DATA 20, 8D , 47, 68, A3 , 68, AA, 6«, 6 

0,D9,5i,D9,51,D9,Sl,D9,51,O9,51,D9,5i,E9 

,5l,D9,5JL,E9,5i,FD,51,GD,52,OD, 4146 

<HG> 1098 DATA 52, OD , 52, FD , 51 , E9, 51, D9, 5 

1,D9,51,D9,S1,D9,51,D9,51,D9,51,D9,51,D9 

, 51, D9, 51, D9, 51, D9, 51, D9, 51, D9, 4618 

<OC> 1099 DATA 51 , D9, 51, D9, 51 , D9, 51, t>3 1 5 
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1, 80, OO, 00,00, 00,00,00,00,00, OO, 00,00,00 

,00,00,00,00, 00,00,00 , 8O,00,0C,128S 

<C0> 1180 DATA 03,63, 00,00,00,00,00, CO, ö 

, PO , E8 , 40 , CO , OO , OO , O« , 20 , 3C , OC , 02 , OE , OO 

,0O,0O,20,FÖ,C0,O0,CÖ,0O,ÖC,3C,1763 

<HG> ilOl »ATA 30,3C,2G f 8A, 8£ , 88 , CO, F3, 3 

0,F8,E0,40,C0, AD,C9,45,29,lF,OA,A8,B9,61 

,52,B5, FE, B9, 62, 52, 85, FF, A0,OF, 374» 

<CH> 1102 DATA B1,FE,99,18,72,88,18,F8, A 

2,87,2O,80,53,9O,2i,AD,C9,45,29,lF,C9,O6 

, DO, 18, 48, 8A, 48, 98,48, A9, 84, 8», 3477 

<PF> 1183 »ATA 8C,47,A2,83,A9,63,A8,01,2 

8, 8», 47, 68, A3, 68, AA, 68, 68, AI, 52, AI, 52, AI 

,52, AI, 52, AI, 52, AI , 52 , Bl , 52 , CA , 3614 

<MC> 1184 DATA 52 , Bi, 52 , Ci, 52, Bl , 52, Gl , S 

2, BA,52, Cl,52, AI, 52, AA, 52, AA, S2 , AI, 52, AI 

,52, AI, 52, AI, 52, AI, 52, AI, 52, A1,4Q32 

<PK> 1±Ö5 »ATA 52,Al,52 J ,Ai,52,Al,52,Al,5 

2, AI, 52, AI, 52, AI, 52, AI, 52, 00,00,00, 00, 00 

,00,00,00,00,00,00,00,00,00,00,2026 

<MJ> 1106 DATA OO , OO, 22 , 96, A6, AA , 22, 08, O 

0, 88, 28, 9A, AB, A6,A6, 88, 80,00,28, 9A,A6,A6 

, A6, 88, 00,00,22, 38, A6,AA, 22,08,2520 

<PB> 1A07 »ATA OO,AD,C9,45,C9,85,90,OB, A 

O , ±7 , A9 , OO , 99 , 28 , 72 , 88 , iO , FA , 68 , AO , 17 , B9 

, 14, 53, 99, 20,72,88, 10, F7,A2, 05, 3289 

<BJ> 1108 »ATA 20,80,53,90,1», Afr,C9, 45, D 

O,18,48,8A,43,98,48,A9,8O,8D,8C,47,A2,03 

, A9, 07, AO, 03, 20, 8», 47, 68, AS, 68, 3242 

<J0> 1109 DATA AA, 68,60,60, 80,80,20,28,0 

8, 08, 02, 82, 88, 80, A0,AO, 88, 88, 3A, 82, 80, 88 

,80, AO, 28, 20,80,88, A0,00, AD, AO, 3287 

<FK> 1118 DATA 73, 48, BS, AI, 73, 99, A8, 73, C 

8, CO, 07, 90, FS, 68, 8», A7, 73, 60, AO,eO,A», A* 

,73,48,B9,A9,73,99,A8,73,C8,CO,4472 

<DM> 1111 »ATA 2F,90,F5,63,8»,»7,73,A2,0 

8,20,80,53,90,21, AD, C9, 45,29, 1F,C9,06, DO 

, 18,48, 8A, 48, 98,43, A9, 83,80, 8C, 3514 

<F»> 1112 DATA 47,A2,Q3, A9,09, AO,01,2O,8 

»,47,68,A8,68,AA,68,60,A»,9C,4S,0A,A8,B9 

,00,90,85,FA,B9,0i,90,85,FB, AO,3727 

<BA> 1113 DATA OB, 8A, »1 , FA, FO, OS, 88 , 10, F 

9,18,60,33,60,01,01,01,01,02,00,00,01,01 

,01,00,01,01,01,00,01,04,00,00,1543 

<0J> 1114 DATA 01,01,81,01,01,01,01,01,0 

1,03,00,00,00,01,01,01,01,01,01,01,01,02 

,00,00,00,01,01,01,01,01,01,01,29 

<BP> 1115 DATA 01,00,04,09,01,81,01,09,0 

1 , Ol , Ol , 09 , 01 , Ol , 00 , OO , Ol , Ol , 09 , OO , Ol , Ol 

,09,07,01,04,80,00,01,01,01,01,78 

<PE> 1116 DATA 01,01,01,01,01,00,04,00,0 

0,01,01,01,01,01,01,81,81,03,08,04,80,01 

,81,61,81,81,31,01,01,02,00,04,38 

<JJ> 1117 DATA OB, 01,01,01,01,01,81,01,0 

1, OB, OB, 06, OB, Ol, Ol, Ol, Ol, Ol, Ol, Ol, Ol, OB 

, OB, 0O,OO,O1, Ol, 07, Ol, Ol, Ol, OC, 112 

<BM> 1118 DATA 81,06,00,80,01,01,01,01,0 

1, Ol, 01, Ol, Ol, OA, 00,00,08,01, Ol, Ol, Ol, Ol 

,01,01,01,08,84,07,01,01,01,00,59 

<»K> 1119 »ATA 01,OA,0A,87,8A,8A,8C,80,8 

A, OA, 08, OA,OA,OA,Oe,0A,0A,8A, 30, 04,00,01 

, Ol , Ol , Ol , OA , O A , A , DA , OO , OO , OO , 188 

<OÖ> 1120 DATA 08,01,01,01,01,01,01,00,0 



1,00,05,00,01,01,01,01,01,01,01,01,01,00 

,06,08,01,01,01,00,01,01,01,01,42 

<OG> 1121 »ATA 01,03,05,04,00,81,81,81,0 

1,81, 81, 81,01,02, 00, OO, 00,01,81,80,01,01 

,01, Ol, Ol, 00,00,00,81, 01,81,80, 33 

<JG> 1122 »ATA 01,01,01,00,01,81,00,05,0 

B, Ol, 80, 08, Ol, 81, 61, 88, Ol, OB, 06, OB, Ol, Ol 

,01, Ol, Ol, OA, OD, OC, OA, 04,00, OO, 103 

<LM> 1123 DATA OA, Ol , Ol , 05, OA, OA , 3A, OA, 

A, 8 A, 80, 04, 00, OA, 07, Ol, 01, Ol, 07, Ol, Ol, Ol 

,80, OS, OB, Ol ,01,01,01, 01,01,00,133 

<PC> 1124 DATA 01,0B,O6,0B,0B,OA,8A,OA,8 

A, 82, 81, 87, 81, 8B, OB, OB, Ol, Ol, Ol, Ol, Ol, Ol 

,01, Ol, Ol, 02, 06, OB, 86,02, 86, 88,186 

<LM> 1125 DATA 01,81,81,01,81,08,84,66,8 

0, 81, Ol, Ol, Ol, OA,OA,OA,0A, 80,84,08,04, 81 

,01,O1,01,0A,3A,8A,6A,60,O8,0O,132 

<0A> 1126 DATA OA, Ol, 81 , 07, OA, 01 , 81, OC, O 

1,0O,O5,0O,81,0B,OB,O1,01,0A,0A,0A,0A,03 

,84,00,00,81,01,08,00,01,01,00,147 

<EM> 1127 DATA 81, 02 , 04, 0O, 01, Ol, 01, Ol, 8 

1,01,01,01,01,01,01,05,04,01,01,00,01,01 

,OE,0E,8E,00,8B,86,81,01,01,01,94 

<I_C> 1128 »ATA 01,OE,OE,OE,01,01,0E,0O,0 

1,01,87,01,01,01,07,81,01,01,88,00,01,01 

, 05, 60, 61, 81, 80,08,81, 8C,8D,8C, 128 

<FF> 1129 »ATA OD, 8C, 08, 80, OD, OC, 8A, OA, 

»,8C,O8,08,8D,0C,OA,0A,00,ee,8A,8A,0D,00 

,88,08,00,01,00,80,01,01,01,01,219 

<PM> 1130 »ATA Ol, O0,05;04, 00,01,01, Ol, 8 

1,01, Öl, Ol, 81, OO, 04, 65, 88, 81, 81, 81, 81, 8A 

,08,88,81,84,88,00,01,01,01,01,50 

<»H> 1131 DATA Ol, OA,0A,OA,0A, 05,O4,00,O 

O, Ol, 81, 81, Ol, Ol, Ol, 88, 8A, 81, 81, 60, 88, 01 

,81,31,81,81,01,01,01,00,08,05,81 

<BX> 1132 »ATA 61, Ol, Ol, 00,01,81, Ol, Ol,0 

1,03,04,05,00,01,01,01,01,01,01,81,81,31 

, 88, 80,00,01, OD, OC, Ol, Ol, 81, 81, 59 

<PA> 1133 »ATA 01,00,08,04,08,61,81,31,8 

1,61,81,81,81,88,84,68,01,01,01,07,01,01 

,00,00,01,02,00,00,00,01,00,00,41 

<CJ> 1134 »ATA 81,01,01,01,01,00,00,00,0 

0,81,07,01,01,01,01,00,01,00,04,00,01,01 

, Ol, Ol, Ol, 01,0», OCOA, 01,00, 08, 72 

<BJ> 1135 »ATA OO,O1,O1,O1,01,OA,0C,01,O 

1,00,00,04,80,01,07,01,01,81,01,01,01,00 

,84,88,61, 01, 81, 81, 81, Ol, Ol, Ol, SO 

<CC> 1136 »ATA 01,01,06,88,33,81,83,06,8 

8,31,00,01,01,00,00,00,00,06,06,06,86,01 

, Ol, Ol, Ol, OO, OO, 07, Ol, OA, 07, Ol, 71 

<NO> 1137 DATA Ol , OA , 00, 07, 0A , 0A, OO, 00, 

A , OA , O A , O A , O A , Ol , Ol , Ol , Ol , Ol , 80 , OO , OO , Ol 

,O1,01,01,0A,00,OA,0A,O0,00,0A,137 

<AO> 1138 »ATA 0A,0A,eO,OA,0A,OA,OA,OA,O 

A , 03 , 00 , 04 , OO , Ol , Ol , Ol , Ol , A , O A , OA , OA , 04 

, 04, 04, OO,01,01, Ol, 81, 0A,00,0A. 167 

<EJ> 1139 DATA OA , 00, 00, 0A, 0A, Ol, Ol , 01, O 

1,01,81,31,81,82,80,00,81,01,00,00,01,01 

, OO, 00,01,01, -00,07, Ol, 0A,0A,0.9, 83 

<AP> 1140 DATA Ol, 0A,OA, 09, 31,00,04,87,0 

1,01,O1,O1,01,0A,OA,OA,OA,OA,OO,ÖO,OO,0A 

,0O,O0 r eA,0A,0D,0C,0A,0A,00,08,180 

<EA> 1141 DATA OA, OA, 0», OA , 0A, OA, 00 , 0A, O 
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,86,88,81,61,01,07,01,01,01,01,118 

<BK> 1142 DATA Ol , 81 , ÖS , OO , ©1, Ol , Ol , 00 , 6 

1,01,01,80,01,01,00,07,01,01,00,01,01,01 

, OB, Ol, Ol, Ol, 8B, 86, 8B, 81, 81, Ol, 64 

<DD> 1143 DATA 81,81,81,81,81,06,06,89,8 

1,01,01,89,81,01,01,09,01,01,08,00,04,01 

,81, Ol, Ol, 81, Ol, 88, 01,00,06, OB, 65 

<ED> 1144 DATA Ol, 81, 81, 81, Ol , Ol, OD ,8A, 

A, 81, 00,00,01,01, 61, 88, Ol, 02,80,00,09, 82 

,00,00,09, 81, 89,01, Ol, OC, 08,88,90 

<PH> 1145 DATA 8D,eC,Oe,86,8D,OC,oe,06,e 

D,8A, 0A,6A,6A, 08, 08, 87, 00,80,80,08, OD, Ol 

,81,61,81,83,04,00,00,01,81,01,159 

<CE> 1146 DATA Ol, 8A, 88, 07, Ol, 88, 88,60, 8 

1, 61, 81, Ol, 81, 81, 88, 8A,6A, 81, 80, 08, 88, 81 

,81,01,81,81,00,00,01,01,08,06,59 

<JC> 1147 DATA 81,01,06,81,61,61,66,80,8 

1, Ol, OD, OC, Ol, 81, OD, 8C, Ol, Ol, 69, Ol, 61, 08 

,88,85,86,81,08,80,81,81,01,00,106 

<PK> 114« DATA 01,00,08,05,80,81,01,68,0 

1,81,81,86,81,08,85,88,06,81,89,81,81,81 

, 60 , 61 , 81 , 61 , 68 , 68 , 68 , 61 , 68 , Ol , 43 

<FF> 1149 DATA 01,61,08,81,81,62,88,88,6 

O,ei,80,01,81,81,fle,8A,8A,08,B7,6A,8A,61 

, 88, 8A,0A, 81, 88, 88, 81, 88, 00,65,85 

<DD> 1158 DATA 88,81,88,06,81,81,68,81,8 

1,B0,0O,QO,80,O1,O0,01,81,OA,OA,OA,0A,O6 

, 68, 88, 8A, 61, 61, 68, 61, 81, 81, 88, 71 

<0G> 1151 DATA 61,81,80,85,61,81,68,81,8 

1,01,88,61,01,61,08,81,01,81,86,81,81,81 

,80,61,61,81,88,68,81,81,81,88,27 

<0E> 1152 DATA 81, 61, 81, 80, 81, 86, 66, 6B, 8 

1,81,81,81,81,81,86,86,81,68,66,68,06,81 

, OD, 0C, Ol, OA,OA, 00,00,08,84, 88, 154 

<CD> 1153 DATA 68 , 81 , 81 , 81 , 61 , 8A , 88 , 8A , 8 

A,8A,ee,84,88,81,6A,81,81,0A,OC,OA,8A,8A 

,8C,8A,0A,8A,6C,6A,0A,81,81,01,181 

<PE> 1154 DATA 01,04,00,04,08,81,82,61,6 

1,81,81,81,81,88,04,88,80,81,81,81,81,81 

,81,81,81,88,64,68,01,01,01,86,37 

<F0> 115S DATA 81,61,81,68,81,80,84,60,8 

1,61,81,81,81,0A,8A,8A,8A,8A,6O,66,68,8A 

,08,67,61,8a, 88, 88, 81, 08, 00,00,92 

<PD> 1156 DATA 01,01,81,81,81,81,61,88,8 

1,06,88,85,08,81,61,88,61,81,81,01,81,88 

,85,88,68,81,81,68,81,01,62,89,48 

<DI> 1157 DATA 81,61,62,89,81,81,88,86,8 

1,81,68,80,81,81,88,87,81,81,82,89,81,61 

,81,87, 01,68, 0O,O5, 04,01, OD, 86,85 

<EB> 1158 DATA 81,61,89,81,81,88,85,80,6 

4, Ol, 66, 68, Ol, 8 A, 88, 8 A, 8 A, 68, 88, 84, 86, 81 

,80,81,61,81,89,81,81,84,88,85,98 

<JE> 1159 DATA 84, 61 , 89, 61, 61, Oft , 07, 8A, 8 

A, 88, 65, 60, 68, 81, 89, 81, 61, 81, 88, 81, 81, 88 

,86,64,66,81,88,81,81,6A,8A,8A,116 

<MI> 1166 DATA 8ft, 04 , OO, 06, 86, 61, 88, 81, 8 

1,0A,8D,6C,8A,64,68,68,88,61,61,81,61,6A 

,68,87,8A,88,e8,85,O8,0A,0D,8A,135 

<HL> 1161 DATA 8A, 61 , 81,61, 81, 63, 86, 68, 

1,01, 86, 88, 81, 88, 82, FF, 88, 83, 88, 07, 86, FF 

, 68, 09, 0A, OD, 66, 66, 86, 66, 16, 11, 626 

<KD> 1162 DATA 14, FF , 66, 15, 66, 17, 1A, 68, 8 



8, 16, IC, 88, IE, 1F, 28, 23, FF, 88, 88, 25, 26, 60 

,00,ee,2C,2D,2B,2F,38,88,32,FF,139e 

<BF> 1163 DATA 88,33,34,68,36,37,80,39,3 

A, 88, 3C,3D, 86,88, 48, FF, 42, 43, 88, 68, 48, 88 

, 86, 80, 4A, 86, 88, 86, 4E, 68, 58, 88, 1284 

<HM> 1164 DATA 86 , 88, 56, FF, 56, 88, 88, 68 , 5 

D, 72, 72, 68, 88, 5E,SF, 61, 62, 88, 88, 88, 68, 69 

, 6A, 88, 88, 6C,6C, 66,78,88,72, 73, 2115 

<EL> 1165 DATA 56,86,88,62,76,62,78,58,6 

2, 76,62,61, FF, 68, 80, 81, 84, 88, 68, 88, 66, 87 

,6A, 88, 0E, 88, 86,68,68, 11, 12, 60, 1387 

<PC> 1166 DATA 68,13,16,86,18,68,88,19,1 

C, 1D, 08, 1F, 28, 21, 88, 68, 22, 68, 26, 27, 68, 88 

,80,00,2D,2ß,2C,eO,2E,2F,88,31,628 

<HL> 1167 DATA 34 , 35 , 86, 37, 36 , 08 , 3A, 3B, 6 

8, 3D,3E, 88, 66, 41, 88, 43, 44, 88, 86, 88, 86, 47 

, 68, 46, 00, 80, 00, 4F, 00,51,08, 60, 962 

<BK> 1168 DATA 00,88,88,55,68,57,80,88,5 

B, 71, 73, 68, 61, 88, 62, 63, 68, 08, 68, 86, 88, 6 7 

,68,69,ee,6D,8E,8e,8e,6F,88,7i,1636 

<P«> 1169 DATA 5D, 88, 68,77,72, 76, 72, 72, 7 

0,72,62,68,88,88,88,88,68,86,84,85,86,88 

, 88 , 88 , 00 , OB , 66 , 88 , 0E , 6F , 86 , 13 , 1178 

<JJ> 1176 DATA 88,80,86,80,15,16,17,88,1 

A, 19, IE, 88, 88, 66, 68, 21, 88, 25, 88, 88,88, 27 

, 28, 29, 2A, 06, 88, 26, 60, 31, 88, 60, 471 

<C0> 1171 DATA 08,68,88,33,88,35,36,37,8 

8, 88, 3ft, 68, 3C, 88, 3E, 88, 88, 41, 88,45, 46, 88 

,48,49,4C,88,4B,4D,86,4F,52,S3,1214 

<LP> 1172 DATA 54, 55, 86,88 , 74, 59, 5A, 56, 5 

D, SC, 73, 5F,5E, 61, 68, 62, 86, 63, 64, 65, 66, 68 

,68,6B,6C,8e,6e,00,6E,6F,7e,73,2584 

<DF> 1173 DATA 80,75,76,66,79,76,79,76,7 

6 , 06 , 7E , 7F , 88 , 61, 88 , 88 , 88 , 85 , 86, 08 , 86, 66 

, 68, 06, 8C, 88, 08, OF, 18, 88, 88, 88, 1257 

<LK> 1174 DATA 12, 68, 17 , 16, 19, 68, IC , 1B, 8 

0,60,88,16,80,68,22,88,08,80,24,88,28,29 

,2A,2B,2E,8e,88,80,8e,8e,3e,O8,584 

<CL> 1175 DATA 36, 68 , 38, 39, 3A , 88, 68, 3D, 6 

8, 3F, 06, 41, 88, 86, 44, 88, 80, 88, 46, 47, 88, 49 

, 4A, 60, 4D,4B,4E, 00,58,00, 00, 51, 1161 

<KB> 1176 DATA 52,53,54,88,80,86,58,59,5 

A , 5D , 56 , 5F , 5E , 61 , 68 , 62 , 64 , 65 , 66 , 67 , 88 , 68 

,ee,88,6A,6B,ee,6F,öe,7i,eo,5c,22i9 

<0A> 1177 DATA 50,59,74,75,75,66,77,79,6 

6, 65, 88, 7D,7E, 86, 88, 81, 18, 18, 18, 18, 05, 83 

, 16, 16, 1B,1B,1B,1B,1B, 10, 1B, 16,1782 

<DM> 1178 DATA 1B, 1B , 1B, 1B, 1B, 1B , 1B, 1B, 1 

B,1B,1B,1B,1B,1B,1B,16,1B,1B,1B,1B,1B,1B 

, 83, 63, 03, 1B,1B, 16, 16, 16,16,16,792 

<MI> 1179 DATA 8A, 8A , 89, 89, 81, 82 , 02, 82 , 8 

2,82,01,81,86,04,64,85,05,66,87,85,87,87 

,87,87,87,87,07,87,87,87,87,86,178 

<MP> 1188 DATA 06,86,65,06,08,08,34,88,3 

4,00,08,88,08,08,08,88,88,68,88,34,34,34 

,34,34,34,34,34,88,08,88,08,08,671 

<FF> 1181 DATA 68,88,68,34,34,34,34,34,3 

4,34,34,80,88,00,88,86,84,82,80,34,38,48 

,48,94,94,88, A4, A4 % A4, A4, 68, 68, 2824 

<GI> 1182 DATA B8, 54 , 0A, A4, A4 , 88 , 88, 74, 8 

8, 34, 88,88, 88, 88, 88, A4, A4, A4, A4 , 68 , 6A,68 

,84;84,84,9D,5B,8C,5D,F3,5C,3E,3722 

<BA> 1183 DATA 5D, 25, 5D,57, 5D,5D,5D,6D f 5 
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D , 89 , 5D , AS , SP , C2 , 5D , OF , SD , FC , SD , ±9 , 5E , 3S 

,5E,51,5E,6D,5E,89,5E,A5,5E,Ci,3554 

<NF> 1184 DATA 5E , DD, 5E ,F9, 5E , 15 , 5F, 31 , 5 

F,4C,5F,67,5F,82,5F,9D,5F,B8,5F,D3,5F,EE 

, 5F, 89, 60, 24, 60, 3F,60,5A, 60,75,3475 

<BE> ±±85 DATA 60, 90,60, AB, 68, C6, 60,61, 5 

D, 6S, SD, 69, 5D, Ei, 6«, El, 68, El, 60, El, 60, El 

,68, FD, 68, FD, 68, 19, 61 „25,61,31,4887 

<KB> 1186 DATA 61, SC, 61, 47, 61, 49, 61, 4C, 6 

i,4F, 61, 52,61, SS, 61, 58, 61, SA, 81, SC, 61, 63 

, 61, 68, 61, 68, 61, 73, 61, 79, 61, 88, 3824 

<JX> 1187 DATA 61, 88, 61, 8E, 61, 36, 61, 9E, 6 

l,A6,61,AE,6i,B6,61,BE,6i,C6,61,CE,6i,D6 

,61jDE,6i,E6,6i,EE,61,F6,61,FE,4658 

<KL> 1188 DATA 61,84,62,04,84,84,84,74,7 

O, 60, 80,00,60, 82, 82, 0A, 84, 84, 08, 88,80,00 

,18,10,88,84,88,88,88,86,88,38,937 

<CG> ±189 DATA 8C , 8C, IC, 38 , 18, IC, 3E, 3E, 7 

E,EE,DE,lE,3E,3E,3C,70,70,38,±C,8C,i8,2O 

, 20, 28, 28, 2E,6E, 86, 88,00,08,20, 1662 

<GC> 1198 DATA 28,28,31,19,88,68,84,84,0 

2, 02,04,08, 18, 88, 88, 88, 80, IC, 38, 38, 38, IC 

, ±8 , 38 , 7C , 7C , 7E , 77 , 7B , 78 , 7« , 7C , ±454 

<D0> 1191 DATA 3C,8E,8E,1C,38,38,18,83,0 

3,03, 83,O3,83,6C,8C,8C,8C,OÖ,0C,OC,0C,88 

, OO, 6C, 88,86,68, 80, 8C, 86, 80,88,382 

<L8> 1192 DATA IC, 38, 30, 38, IC, 18, 18, 3C, 3 

6, 36,3B,3D,3C,3C, 3C, 38,36,36, 36, 76,E3,83 

,86, 86, 87, 88, 88, 80, IC, 30,30,38, 1749 

<tB> 1193 DATA IC , 18, 18, 28 , 2C, 2C, 2C, 34 , 3 

6,38,3C,3C,3C,3C,36,36,36,36,66,46,27 f 00 

, 88, 80, IC, 30, 38, 38, IC, 18, 18, 18, 1357 

<0K> 1194 DATA 3C, 3C, 3C, 3C, 3C, 3C,2C ,3C, 3 

C, 18, 18, 18, IC, IC, 38, 18, 18, IC, 80, 00, 00, IC 

, 38 , 38 , 38 , IC , 18 , 18 , 18 , 18 , IC , 34 , 1168 

<GD> ±±95 DATA 6C, DC, BC, 3C , 3C, 3C, 18, 38, 3 

C, 3C, 66, 66, 6C,7C, 78,88,88,00, IC, 38, 38,38 

, IC , 18 , 18 , 18 , 18 , IC , 34 , 6C , DC , BC , 2356 

<AD> 1196 DATA 3C, 3C, 3C, 36 , 36 , 36, 76, E3 , 8 

3 , 86 , 06 , 87 , 88 , 88 , 88 , IC ,30 , 38 , 38 , IC ,18 , 18 

,18,3C,3C,3C,3C,3C,3C,2C,3C,3C,1769 

<LF> 1197 DATA 3C, 3C, 36, 36, 36, 36, 66, 46, 2 

7,88,88,66,lC,3e,38,38,iC,±8,±8,28,2C,2C 

, 2C, 34, 36, 38, 3C, 3C, 18, 18, 18, IC, 1357 

<AC> 1198 DATA IC, 38, 18, 18, IC , 00,00,80, 1 

£,36, 38, 38, IC , 18, 18, 3C, 36, 36, 38, 3D, 3C,3C 

,3C,3C,18,38,3C,3C,66,66,6C,7C,1580 

<MF> 1199 DATA 7C , 28, 20, 20, 20, 2E, 2E, 06 , O 

0, 00, 80,14,12, 12,11, 19, OC, 80, 88, 00, 12, 12 

,12,12,61,81,82,02,81,28,28,28,987 

<KD> 1206 DATA 28, 2E, 2E, 86, 88, 68,80,88,0 

4,04,04,04,06,80,00,00,80,14,12,12,12,12 

, 22, 42, 21, 20, 20, 28, 28, 2E,2E, 06, 611 

<LM> 1281 DATA 80,60,00,00,08,08,88,08,0 

8, 00,80, 00, 88, 08, 88, 8C,8C, 28, 88,88, 84, 20 

, 20, 20, 28, 2E,2E, 06, 80,00,08, 88, 374 

<KE> 1282 DATA 08,10,28,48,88,86,00,08,0 

0,00, 84, 14, 22, 22, 24, 24, 14, 28, 20, 20, 28, 2E 

,2E,86, 88,88,88, 88, 88, 10, 20, 48, 806 

<KK> 1283 DATA 8C, 80, 80, 08, 12, 12, 12 , 12, 6 

1, 81, 82, 82, Ol, 28, 28, 28, 28, 2E,2E, 86, 80, 88 

,00,80,08,08,08,08,68,08,00,00,837 




<AF> 
<GK> 
<FC> 
<GM> 
<MA> 
<HL> 
<GP> 
<AM> 



REM X XXXXKXXXXXXXX - XXXKXXXXXX 

REM * 

REM * 

REM * 

REM * 
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REM » Frank T. Hittennayer x- 
REM * * 



REM XXXXKXXXXXXXXXXXXXXXXXXX 

<FG> 18 DXM HEX5C23,CIÖ$C4ö>,SI0SC40S,PU 
FFERS *64«128 J : PUFFER* «64*1281 =" *" 

<LE> 28 GRAPHXC5 6 1 S ETCOLOR 2 ,0,8:? "KU 
CUMlM'WTiiaBFT * 1 ™ HIWWTT1 " \ t "tcJ 19 
87 by Frank T. HittenMasfer" 

<FP> 30 S5EC=52iE5EC=i02 

<DJ> 40 RE5T0RE 988;F0R X-l TO 40: READ A 

:SX05{K3=CHR$CA3 JMEKT K 

<DD> 56 F6R K-l TO 48 : READ A I CIÖS *K1 =CHR 
SCAJ :HEXT K 

<KF> 188 GOSUB 400 

<PF> lio ? :? "Generierung auf öäisk oder 

ßassette ?" 
<CG> 120 CLOSE ItJLlOPEH »1, 4, 0, "K :" : 6ET « 
l,A:CLOSE «1 : ? 

<KG> 130 XF A=A5C*"D"J THEH GOSUB 508 : EM 
D 

<KH> 140 IF A=ASCl"C") THEM G85UB 608: EH 
D 

<GC> ISO GOTO 120 

<ak> 400 ? :? "Einen Manen* bitte...":? 
<NG> 410 PUFFER-l:FOR ZEXUE^iOOO T8 1008 
+<E5EC-SSEC+1J*4-1 
<MX> 428 UERIFY=0 

<KC> 430 FOR X=0 TO 31: READ HEX$:Ci=ASCC 
HEX$C1,D) :C2=A5CCHEKSC2,2S1 
<EP> 440 A=i6«tCCi-483«<Cl<58J*CCi~55S*C 
Ci>6453 + CC2-485*CC2<585 + tC2-553*eCC2>64J 
<CP> 458 PUFFERS CPUFFER3 =CHR$ CA3 I PUFFERE 
PUFFERH:VERXFY=VERIFY+A:HEXT K 
<KK> 468 READ A:XF AOVERXFY THEH ? :? " 
C3FEIU.ER XM ZEILE ";ZEILE:? "Bitte verbes 
sern und Prograww neu":? "starten!":EHD 
<PC> 476 ? "«";:NEXT ZEILE:? : RETURH 
<JX> 508 ? "Destination Diskette einlege 
n,H£<EOr* 

<BK> 518 XF PEEKC53279) <>6 THEH 518 

<HII> 520 PUFFER=ADR CPUFFER$J :F8R SEKTORS 

SSEC TO E5EC 

<HD> 530 ERR=U5RCADRC5I0$J, 87, SEKTOR, PUF 

FER5 ^ 

<KJ> 540 XF ERR>127 TUEN ? "KS53C EECTKE3 

liTTIiM'TTM" ' ^"^ 

<H0> 550 PUFFER=PUFFER+128:NEXT SEKTOR 

<HL> 560 RETURN 

<ma> 680 ? "Cassette einie3en,HiläÜtini3i": 
opem »1,8, 128, "er" 

<HD> 616 ERR=U6RCADRCCXO*»,l,l±,ADRtPUFF 

ER53 , «ESEC~SSEC+i>*1283i 

<BH> 620 XF ERR>127 THEH ? "«533^36^333 

iiim*j.m*mv}ims:TM" •. ehd 

<HH> 630 CLOSE »1: RETURH 

<EE> 988 DATA 104,104,104,141,2,3,184,14 
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1,11,3,184,141,18,3,184,141,5,3,104,141, 

4,3,169,1,141,1,3,32,83,228 

<HJ> 910 DATA 173,3,3,133,212,169,8,133, 

213,96 

<KI> 928 DATA 104,104,184,24,10,10,10,10 

,170,104,184,157,66,3,184,157,69,3,104,1 

57 , 68 , 3 , 184 , 157 , 73 ,3,184, 157 

<[>M> 938 DATA 72,3,32,86,228,132,212,169 

,8,133,213,96 

<JL> 1808 DATA 80,14,12,12,12,12,22,42,2 

1, 20, 28, 20, 28, 2E,2E, 86, 80,00, 00,08,04, 04 

,04, 84, 86, 80, OO, 80, 68, 88, 68, 8C, 517 

<KO> lOOl DATA OC, 28, 88, 88, 84, 28, 20, 28, 2 

6, 2E,2E, 06, OD, 00,00,14, 12, 12, 11, 19, OC, 00 

, OO , OO , OO , OO , 04 , 14 , 22 , 22 , 24 , 24 , S72 

<EM> 1002 DATA 14, 88, 88, 66, 38 , 8C, 8C, IC , 3 

8,18,3C,6C,EC,DC,BC,3C,3C,3C,3C,6C,6C,6C 

, 6E , C7 , Cl , 61 , 68 , EO , 88 , OO , 88 , 38 , 2559 

<C0> 1883 DATA OC , OC, IC, 38, 18 , 14, 34, 34, 3 

4,1C,6C,1C,3C,3C,3C,3C,6C,6C,6C,6C,6E,62 

, E4 , OO , OO , 80 , 38 , 8C , 8C , IC , 38 , 18 , 1768 

<PM> 1804 DATA 3C, 3C, 3C, 3C, 3C, 3C, 34, IC, 1 

C, 18, 18, 18, 38, 38, IC, IC, IC, 3C, 88, 88, 88, 38 

,8C,8C,1C,38,18,18,38,2C,26,3B,1205 

<DC> 10O5 DATA 3D, 3C, 3C, 3C, 18, IC, 3C, 3C, 6 

6, 66, 36, 3E, 3E, 00,00,00, 38, OC, 0C,1C, 36,18 

, 18, 38 , 2C , 26 , 3B , 3D , 3C , 3C , 3C , 6C , 1553 

<CL> 1006 DATA 6C, 6C, 6E, C7, Cl, 61, 68, EO, O 

8,00,O0,38,8C,0C,1C,38,18,3C,3C,3C,3C,3C 

, 3C,34, 3C,3C,3C,3C,6C,6C,6C,6C, 2487 

<MH> 1007 DATA 6E, 62, E4, OO, 00, 80, 38, OC, O 

C, IC, 38, 18, 14, 34, 34, 34, IC, 6C, IC, IC, IC, 18 

,18, 18, 38, 38, IC, IC, IC, 38,88,80, 1348 

<ED> 1088 DATA 08, 38, 8C, ÖC, IC, 38, 18, 3C, 6 

C,EC,DC,BC,3C,3C,3C,3C,18,1C,3C,3C,66,66 

,36 , 3E , 3E , 84 , 04 , 04 , 84 , 74 , 78 , 60 , 2134 

<IL> 1009 DATA 00,88,00,20,20,40,80,00,0 

0,00,00,24,24,24,22,41,41,21,20,20,04,04 

,04,04,74,70,60,00,00,10,18,10,1813 

<IK> 1010 DATA 10,20,60,00,00,00,00,04,2 

4,24,24,24,22,22,24,04,04,04,04,74,70,60 

, OO , OO , 08 , 88 , OS , 08 , OS , 08 , OO , OO , 784 

<KF> 1011 DATA 00,08,88,08,28,28,0C,08,0 

8,08,04,04,04,04,74,70,60,00,00,00,08,84 

, 02 , 09 , 71 , OO , 06 , 00 , DO , 04 , 14 , 14 , 66D 

<HM> 1812 DATA 22,22,12,02,02,04,04,04,0 

4, 74, 70, 60, OO, 00 , 00, 08, 04, 02, 09, 71, 00 , 00 

,00,24,24,24,22,41,41,21,20,20,935 

<JM> 1013 DATA 04,04,04,04,74,70,60,00,0 

O, 08 , 88 , OS , ÖS, 08 , 08 , OO, OO , OO , OO, 04 , 24 , 24 

,24,24,22,22,24,04,04,04,04,74,772 

<JX_> 1Ö14 DATA 70,68,06,00,10,18,10,10,2 

0, 60, OO, OO, 00,08,08, 08, 28, 28, OC, 08,08,08 

,84, 04, 84, 64, 74, 76, 60, OD, 00,00,880 

<GA> 1015 DATA 20,20,40,88,80,00,00,00,0 

0,04,14,14,22,22,12,02,02,00,00,80,38,44 

,44,7C,38,10,38,7C,7C,FE,FE,FE,1844 

<PP> 1016 DATA FE,FD,7C,7C,7C,6C,6C,6C,6 

C,6C,6C,6C,C6, 18, 10,10,00, 38, 38, 80,00,00 

,00,44, 44, 82,82,82,82,81, 80,88, 2778 

<GK> 1817 DATA 84,24,24,24,24,24,24,24,4 

2,8E,FF,93,93,FF,D7,FF,02,44,7C,38,00,6E 

,FF,93,93,FF,D7,FF,42,04,7C,38,3590 



<0H> 1818 DATA 00,00,01,01,49,01,01,01,5 

6, 2C, 04,00,00, Ol, Ol, 25, Ol, Ol, 61, 2 A, 54, 04 

, 00, OO, 30, 42, A6, 99,00, E7, 18, 88, 1072 

<JE> 1819 DATA C3, 3C, 81 , 42, 3C , 00 , 18, 81, 8 

8, 99, 81, 18,06, 86, 86, 86, 86, 06, 06, OO, 0O,7F 

,FF,7F,80,0A,F0,00,Ö3,88,0A,F0,2023 

<LD> 1O20 DATA 80, 02, Ol, 06, 8D, FF, FF, FC, O 

3,06,OD,FF,FF,FC,02,03,3C,66,FB,FF,FF,FF 

,7E,3C, IC, IE, 07, 83, 81, 81, 18, 24, 3067 

<GJ> 1021 DATA 7A,FF,FF,7E,3C,18,10,38,4 

4,80,80,40,20,10,10,18,24,20,20,20,10,10 

,08, 18, 84, 84, 84, 84, 08,08,08, IC, 1654 

<MF> 1022 DATA 06, Ol , Ol, 02, 04, 08, SC, 72, F 

D,FF,FF,FF,7E,3C,30,4C,82,80,80,80,40,38 

,10, IC, 22, 20,20,20,10, 10, 08, 8C , 2376 

<BF> 1023 DATA 06, 04 , 04, 04, 08, 08 , OC, OE, O 

3,01,01,01,02,0C,6O,98,EF,FF,7E,3C,70,70 

,60,9C,CF,7F,3F,76,60,00,7C,DE,2441 

<GE> 1024 DATA EF, 7F , 3E, IC, 18, OO, 00, 60, 1 

0, Ol, 02, OC, 10,00,00, 60, 31, Öl, 01,06,00,20 

, 31 , Ol , 02 , 0C , 10 , 00 , CE , A7 , 45 , AD , 1495 

<MH> 1025 DATA A7, 45, 10, 28 , A9, 07, OD, A7, 4 

5,EE,4D,49,AD,4D,49,D0,03,EE,4E,49,AD,4E 

,49,C9,4A,90,il,AD,4D,49,C9,3B,3499 

<GA> 1826 DATA 98 , 6A, A9, 92, 8D, 4D , 49 , A9, 4 

9, 8D, 4E, 49, 60, A9, 96,88,08,02, A9,62,8D,01 

,O2,A9,0O,8D,A9,45,A9,C0,8D,0E,3327 

<GE> 1Ö27 DATA D4 , 60, A2, OF, AD, A8, 4S, 29 , F 

O,89,OS,8D,OA,D4,8D,18,D0,18,69,18,CA,1O 

, F4 , A9, OO, SD, 18, DO, 09,08, 80,17,3419 

<KB> 1828 DATA DO , EE, A8, 45 , 68, A9, 74, 8D , 

9,D4,AD,A7,45,8D,04,D4,A2,07,AD, A8,45,29 

,FO,09,OC,8D,OA,D4,8D,18,DO,18,3833 

<CI> 1829 DATA 69, 18, CA, 16, F4, 60, 48, 8A, 4 

8, 98, 48, AD, A9 , 45, DO, 06, 20,52,62, 4C,D5, 62 

,C9,01,D0,86,28,DE,62,4C,D5,62,3564 

<6X> 1830 DATA C9,O2,D0,06,20,13,63,4C,D 

5,62,C9,03,DO,O6,2O,2E,63,4C,D5,62,C9,04 

,D0,06,20,08,63,4C,D5,62,C9,05,3087 

<GI> 1031 DATA D0,03,ZB,75,62,EE,A9,45,6 

8, A8, 68, AA, 68,40, A9, 70,88,09, 04, 28, 49, 4D 

, AD , CS , 02 , 8D, 17, DO , AD , C6, 02 , 8D , 3731 

<XP> 1032 DATA 18 , D8, AD, D4, 45, 8D, 02, DO, 8 

D,83,DQ, AD, EO, 45, OD, 14, DO, AD , E4, 45, 8D, 15 

,D8,50,A9,00,8D,1A,DO,A9,1A,8D,4040 

<HM> 1033 DATA 16, DO, 60, A9 , 72, 6D, 19, DO , A 

D,D5,45,8D,62,D0,3D,83,DO,AD,E1,45,8D,14 

,DO,AD,E5,45,8D,15,D8,66,A9,70,419S 

<Cli> 1034 DATA 8D, 19, DO , AD , D6 , 45, 8D, 62 , D 

O,SD,O3,DO,AD,E2,45,8D,14,D0,AD,E6,45,8D 

,15, DO, 68, 60, 00,00,00, 00,00,59, 3397 

<EG> 1835 DATA 00,00,00,00,08,00,00,00,0 

O, 59, 00, 81,00,00, 00, OOi 81, 81, 59, 88, 86, 88 

,00,08, OO, OO, OO, 00,08,81,00,00, 694 

<PP> 1036 DATA 00,81, A9,A9, 00,00,00,00, 8 

1,00, OO, 00,00,00, 00, 59, 80, 81, 59, 68,88,08 

,59,00,59,00,59,00,00,59,00,81,1497 

<EB> 1037 DATA 81,00,95,00,81,00,81,08,8 

8, 81, 81, 59, 81, 81, 59, 00,59,59, 81, 59,59,00 

,00,69,59,59,59,59,00,00,59,59,2338 

<CJ> 1038 DATA 81,59,00,59,00,00,00,00,8 

1,00,59,00,00,00,59,00,59,59,59,00,59,00 

, 59, 59, OO, 00, 59, 59, A9, 81, 81, 59, 1842 
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<DG> 1039 DATA 81,59,00,00,81,00,81,31,8 

1,59,81,59,81,09,8118**59,00,01,59,81,00 

,59,81,81,31,31,81,81,81,00,00,2785 

<KC> 1040 »ATA 81, 59, OO, 0O, 81, A9, 31, 59, 8 

J., 81, 31, A9, 81, 31, 81, A9, 59, 81, 59, 31, 31, 59 

, 59, 59, OO, A9, 59, A9, A9 , 31, 81, 59, 3141 

<JJ> 1041 DATA 31, 09,59,59, 31, 00, 59, 00,O 

0, 81, 31, 81, 81, 59, OO, A9, 59, 81, 59, 59, 59,59 

, 31, 59, A9, 31, 59, A9, 81, 59, 59,81,2852 

<KL> 1042 DATA 00,59,00,59,00,59,81,31,3 

1,A9,81,59,31,6D,59,59,81,A9,59,A9,A9,A9 

, A9 , 59 , 81 , OO , OO, 00 , 00, 81, 59 , 00 , 2796 

<HK> 1043 DATA 00,00,00,00,00,00,00,81,5 

9 , OO , OO , 00 , 81 , OO , 81 , 81 , 59 , 00 , 81 , 00 , OO $ 00 

, OO , 31 , 00 , OO , OO , OO , OO , OO , 81 , OO , IOOI 

<JP> 104-4 DATA OO, 81, 00, A9 , 81, 00,00,00,0 

0,00,00,00,59,00,00,59,00,00,00,00,00,81 

, OO , OO , OO , 00 , 59 , OO , OO , OO , 59 , 81 , 1041 

<CO> 1045 DftTA 00,59,59,00,00,81,59,00,8 

1,00,00,81,59,00,45,00,00,00,59,59,00,00 

,59,59,59,59,59,59,81,59,59,81,1950 

<0M> 1046 DATA 00,59,00,00,00,00,00,81,0 

0,59,00,00,00,59,60,59,59,59,59,59,59,00 

,00,59,59,00,00,00,00,00,00,04,1221 

<0B> 1047 DATA 00,00,00,08,00,00,00,00,0 

0,01,00,06,00,00,00,00,05,01,04,00,00,00 

,00,00,00,00,00,00,00,01,00,00,18 

<PO> iO-48 DATA 00,00,03,04,04,00,00,00,0 

0,08,00,00,00,00,00,04,00,04,04,84,00,00 

,03,00,04,00,04,00,00,01,00,03,50 

<BJ> 1049 DATA 04,00,04,00,01,00,01,00,0 

, 04 , 02 , 04 , 08 , 88 , OO , OO , 08 , Ol , Öl , 04 , 04 , OO 

,00,04,01,03,05,02,00,00,01,04,72 

<AP> 1050 DATA 01,04,00,01,00,00,00,00,0 

1,08,04,00,00,00,05,00,04,02,04,00,01,00 

,04,08,00,80,07,02,07,06,08,82,71 

<HH> 1051 DATA 05,06,00,08,08,00,05,07,0 

8 , 02 , 03 , 03 , 08 , 07 , Ö6 , 03 , 06 , OO , 02 , 02 , 07 , OO 

,06,05,08,07,07,01,05,03,00,00,130 

<JH> 1052 DATA 05, 02, OÖ, OO, 86, 07, 07, 02, O 

7,05,07,07,02,07,08,06,02,05,85,07,07,08 

,06,03,00,07,03,07,07,07,83,02,157 

<KI> 1053 DATA 03^07,06,06,07,01,05,00,0 

0,05,07,08,05,08,00,07,03,05,06,04,02,06 

,07,05,87,07,06,03,08,05,08,85,167 

<IK> 1054 DATA 00,05,08,05,00,02,07,07,0 

7,07,06,05,08,04,07,05,06,07,88,07,05,03 

,07,86,06,00,00,00,08,04,04,00,138 

<0M> 1055 DATA 80,00,00,00,00,00,00,01,0 

1, OO, 08, 08, 04, OO, 82, 81, 85, 0O, 08, 88, Q0, 88 

,00,06,00,00,00,00,08,00,01,00,29 

<PE> 1056 DATA 00,05,00,04,06,00,00,00,0 

0,00,00,00,04,00,00,04,00,00,00,00,00,08 

,00,00,00,00,01,00,00,00,05,04,41 

<BD> 1057 DATA 00,02,04,00,00,01,08,00,0 

4,00,00,01,84,00,04,00,00,00,05,04,00,00 

,04,01,02,03,05,02,02,01,06,02,65 

<GB> 1058 DATA OO, 04 , OO, 00, OO, 00, 00, 08, O 

0,04,08,00,00,04,04,04,06,01,04,04,04,00 

,80, 04, 05, OO, OO, 01, OO, FE, 00, OO, 311 

<KG> 1059 DATA 10, IO, OO, 00, 00, 14, 04, 00, 8 

0,80,00,00,AD,9D,45,18,69,02,8D,5B,66,AC 

,98,45,98, 29, 63, CD, 58,66, 90,08,2063 



<IL> 106O DATA A9, 00 , 8D, BF, 45, 4C, 9F, 66, B 

9, OO, 91, 8D, BF, 45, AA, 89,49,63, 18, 7D, 49, 66 

, 8D, D4 , 45 M A9 , 44 , 18 , 7D , 52 , 66 , 8D , 3622 

<EH> 1061 DATA D8 , 45, A9, OO, 8D, B3, 45, 8D , B 

7,45, A9, 01, 8D, 88,45,98,18,69, 81, 29, 03, CD 

, 5B , 66 , 98 , 88 , A9 , 80 , 8D , CO , 45 , 4C , 3326 

<IE> 1062 DATA D9 , 66 , 89 , SO , 91, 8D , CO , 45 , A 

A , B9 , C9 , 63 , 18 , 7D , 49 , 66 , 8D , DS , 45 , A9 , 74 , 18 

,7D,S2,66,8D,D9,4S, A9, OO, 8D , B4, 4116 

<CL> 1063 DATA 45 , 8D, B8, 45 , A9 , Ol, 8D , BC, 4 

5, 98, 18, 69, 02, 29, 03, CD, SB, 66, 90, 08, A9, 00 

,8D,C1,45,4C,13,67,B9,O0,92,8D,315O 

<TJ> 1064 DATA Cl, 45, AA, B9,49, 64 , 18, 7D,4 

9,66,8D,D6,45,A9, A4, 18,70,52,66, 8D, DA, 45 

,A9,00,8D,B5,45,8D,B9,45,A9,Ol,3757 

<GE> 1065 DATA 8D, BD , 45 , 20, 17, 67, 60 » A2, O 

2,BD,BF,45,0A,A8,B9,2C,67,48,B9,2B,67,48 

, 60, CA, IO, EF, 60, 3C, 67, 44, 67, 72, 3348 

<LL> 1066 DATA 67 , CB, 67, E7, 67, 3D, 68, Bl, 6 

8 , CE , 68 , FB , 68 , A9 , ÖÖ, 9D , D4, 45, 4C , 27 , 67, FE 

,B3,45,BD J B3,45,4A,4A,29,01,A8,3976 

<JG> 1067 DATA B9 , 6F, 67, 9D, CC, 45 , B9, 71, 6 

7,9D,DO,4S,BD,B3,45,29,20,FO,06,DE,D4,45 

, 4C, 27, 67, FE, D4, 45, 40,27,67,31,3943 

<KC> IO68 DATA 32 , 33 , 34, FE, B3 , 45, BD, B3, 4 

5,4A,29,07,A8,B9,BC,67,9D,CC,45,B9,C4,67 

,9D, DO, 45, BD, B3,45, 29, 30, DO, 09, 3949 

<AA> 1069 DATA FE, D4 , 45, FE, D4 ,45, 4C, B9, 6 

7 , C9 , IO , DO , 09 , FE , D8 , 45 , FE , D8 , 45 , 4C , B9 , 67 

,C9,28,D0,O9,DE,D4,45,DE, D4,45,4766 

<KB> 1070 DATA 4C, 69 , 67, DE, D8 , 45, DE, D8,4 

5, 4C, 27, 67, 36, 37, 38, 39, 39, 38, 37, 36, 3 A, 38 

,3B,3C,3C,3B,3B,3A,A9,3D,9D,CC,3i03 

<KA> 1071 DATA 45 , A9 , 3E, 9D , DO , 45, DE, D4 , 4 

5,2O,1D,68,C9,OO,FO,05,A9,0O,9D,BF,45,4C 

,27,67,FE,B3,45,BD,B3,4S,4A,4A,3739 

<GI> 1072 DATA 29, Ol , A8, B9 , 19,68, 9D, CC,4 

5, B9,1B, 68, 9D, DO, 45, BD, 63,45,29,03, DO, 10 

,BD,B3,45,29,20,FO,06,FE,D4,45,3700 

<KI> 1073 DATA 4C , 27 , 67, DE, D4 , 45, 4C , 27, 6 

7,3F,40,41,42,BD,D8,45,38,E9,3C,4A,4A,4A 

, OA , A8, B9,6A, 49, 85, FC, B9, 68,49,3534 

<MÜ> 1074 DATA 85,FD,BD,D4,45,38,E9,2C,4 

A,4A,A8,B1,FC,68,A9,43,9D,CC,45,A9,44,9D 

, DO, 45, 20, 1D, 68, DO, 18, BD, D8 , 45, 4238 

<JJ> 1075 DATA DO, AC, 68, 98, 10 , DD, AF,68,B 

O,OB,B0,D4,45,C9,34,9ö,04,C9,C4,98,2A,AD 

, OA, D2, 10, OS, A9,01,4C, 71,68, A9,. 3844 

<B1> 1076 DATA FF, 9D, B7, 45, AD, 0A, D2, 10, O 

5, A9,0i,4C,80,68, A9 , FF , 9D, BB , 45 , BD , AF, 45 

, 9D,D4,45,BD,AB,45,9D,D8,45,BD,4324 

<LI> 1677 DATA D4 , 4S , 9D , AF , 45 , 18, 7D , B7, 4 

5 , 9D , D4 , 45 , BD , D8 , 45 , 9D , AB , 45 , 18 , 7D , BB , 45 

,9D,D8,45,4C,27,67,44,74, A4, 67, 3908 

<LP> 1878 DATA 97 , C7 , FE, B3 , 45, BD, B3, 45 , 4 

A,4A,29,03, A8,A9,45,9D,CC,4S,B9,CB,68,9D 

, DO, 45, 40,48,68, 46, 47, 48, 49, FE, 4635 

<MC> 1079 DATA B3„45, BD, B3 , 45, 29, 20, FO, 8 

6,DE,D8,45,4C t E2,68,FE,D8,45,BD,B3,45,4A 

, 4A,29,Ö3, A8,Ä9, 4 A,9D, CC, 45, B9, 4111 

<HK> 1080 DATA F8, 68 , 9D, DO, 45, 4C, 27 , 67 , 4 

B,4C,4D,4E,FE,B3,45,BD,B3,45,4A,4A,4A,29 

,03,A8,B9,47,69,9D,CC,45,B9,4B,3734 



Computronic 



51 



tfM 



<KG> 1081 DATA 69 , 9D, l>0 , 45, BD , B3, 45, 29, 3 

0,I)0 J 03,FE J I>4,45 J FE I I>S J 4S,4C,44 I 69 J C9 I 10 

, DB, 09 , DE , D4 , 45 , FE , D8 , 45, 4C , 44 , 4225 

<FP> 1082 DATA 69 , C9 , 20 , DO , 09 , DE, D4 , 45, D 

E,D8,45,4C,44,69,FE,D4,45,DE,D8,45 J 4C,27 

, 67, 4F, SO, 51, 50, 52, 53, 54, 53, 20, 3758 

<CJ> 1083 DATA 5F,69,20,85,6B,2e,4A,6B,2 

o,c6,6b,28,ob,6c,6o,ad,78,o2,29,0c,c9,oc 
,F8,83,8d,as,45,20,27,6c,98,6a,2653 
<li> 1084 data ad , 9f , 45, 85, 88, ad, ao, 45, 8 
5, 8c, a5,88,8d,9f,45,a5,8c,8d, ab, 45, ac, 78 

, 02, B9,C5, 6 A, 1.8,65, 88, 85, 88 „65,4187 

<MB> 1885 DATA D5, 6A, 18, 65, 8C, 85, 8C, C9,9 

F,BO,26,38,E9,24,4A,4A,4A,8A, A8,B9,6A,49 

, 85 , FC , BS , 6B , 49 , 85 , FD , AS , 88 , 38 , 401 3 

<I1> 1886 DATA E9 , 30, 4A, 4A, A8 , Bl, FC, 29 , 7 

F,C9,72,B8,04,C9,61,B0,64, A9, 86, 8D, Al, 45 

, EE, A4, 45, AD,A4,45, 29,87, 80,18,3960 

<FI_> A087 DATA 48 , 8A, 48, 98 , 48, A9, 88 , 8D, 8 

C, 47, A2, 80, A9, 82, AO, Ol, 20,88,47,68, AS, 68 

,AA,68,AD,A5,4S,C9,88,D8,iB, A9,3435 

<EF> 1088 DATA 81, 85, 84, A9, 82 , 85, 85, AD, C 

4,6A,D8,03,4Cj A4,6A, A9, 19,85, 84, A9, 21,85 

,85,4C,A4,6A,A9,83,85,84,A9,Ö4,3618 

<HL> 1889 DATA 85, 85 , AD, C4, 6A , DO, 83, 4C, A 

4,6A, A9,89,85,84,A9,il,85,85,4C,Ö4,6A, A5 

,8C,29,F8,09,84,85,8Cjft9,01 / 8D,3738 

<HP> 1898 DATA AI , 45 , AD, 78, 82 , 29, OC, C9 , O 

C,F8,44,EE,A4,4S,AD, A4, 45 , 29, 87, DO, 3A , AD 

,8A,D2,C9,48,98,1B,48,8A,48,98,3553 

<FF> 1891 DATA 48 , A9 , 88, 8D , 8C , 47 , A2, 88 , A 

9,81, A0,82,20,8fr,47,68, A8,68,ftA,68,4C,7F 

, 6A , 48 , 8 A , 48 , 98 , 48 , A9 , 86 , 8D , 8C , 3246 

<HF> 1892 DATA 47, A2, 86, A9 , 81, AO, 84, 28, 8 

D,47,68, A8,68, AA,68,AD, A4 , 45, 4A, 29, 87 , A8 

, AD, AS, 45,89,88, F6,0D,B9,E5, 6 A, 3546 

<OK> 1093 DATA 85, 84 , 09, ED, 6A, 85, 85, 4C, A 

4,6A,B9,F5,6A,85,84,B9,FD,6A,85,85, A5,88 

,85,89,A5,8C,85,8D,AD,GA,D2,D0,4767 

<B0> 1894 DATA 8A, AD, 8A, D2 , 29, 07, 69 , 03 , 8 

D,C4,6A, AD, C4,6A,F8, 83, CE,C4, 6 A, 68,88,80 

,OB, 06 ,08, 88, Ol, Ol, 61,00, FF, FF, 2741 

<HI> 1895 DATA FF, 88, 88, 88, 88, OO, 88, 68, 8 

8, 88, 81, FF, 88, 88, Ol, FF, OO, 88, 81, FF, 00, 87 

,B8,e9,BA ( 8B,6C,8D,8E,0F,18,ll,115S 

<PE> 1896 DATA 12,13,14,15,16,17,18,19,1 

A,lB,lC,lD,lE,lF,20,2i,22,23,24,2S,26, AD 

,A2,45,D8,3A,AD,A1,45,F8,35,AD,2127 

<FM> 1897 DATA 78, 02, C9, OD „ D8, 2E, EE, A3, 4 

5, AD , A3, 45, C9, 8F, 88, 81, 68 , A5 , 88, 18 , 69 , 02 

, 85 , 9 A , 69 , Ol , 85 , 9B , A5 , 8C , 18 , 69 , 3581 

<EH> 1898 DATA 12, 85, 9F, 69 , 84, 85, 9E , A9 , 3 

F,3D,A2,45,A9,85,85 J 96,A9,86,85,97,A9,88 

,8D, A3, 45, 68, AD, A2, 45, DO, 81, 68,3577 

<X8> 1899 DATA CE, A2 , 45, AD , A2, 45, F8 , 23, 4 

A,4A,4A,4A, A8 , 89, C2, 68, 85 , 97, 48, SA ,48, 98 

,48, A9,85,8D,8C,47, A2,82, A9,65,3728 

<DM> 1168 DATA A8 , 80, 28, 8D , 47, 68, A8, 68 , A 

A, 68, 60, 28, IC, 4D, AS, 88, 38, ES, 9A, 18, 69, 16 

,C9,2O,B0,19, A5,8C,3B,E5,9E,i8,3384 

<£X> 1181 DATA 89,25, C9, 28, B8,6D, A9,88,8 

5,9A,8S,9B,68,68,68,68,4C,3C,6E, A9,00,85 

,9A,85,9B,48,8A,48,98,48, A9, 00, 3389 



<AJ> 1182 DATA 8D, 8C, 47, A2, 62, A9, 84, A8, O 
4, 28, 8D, 47, 68, A8, 68, AA, 68, 66, 29, 28, 27, 66 
, AD , 84 , 82 , FO , Ol , 68 , A5 , 9C , FO , Ol , 3175 
<KP> 1183 DATA 60, AS, 88, 85, 9C, A5, 8C, 18, 6 
9,85,85,A8,A9,87,8D,C4,45,AD,A5,45,C9,08 
,D8,85, A9,FB,4C,EF,6B,A9, 85,88,3986 
<CM> 1184 DATA C3, 45, 48, 8A, 48, 98, 48, A9 , 
0,8D,8C,47,A2,01,A9,03,A0,01,20,8D,47,6S 
, A8 » 68 , A A , 68 , 68 , A5 , 9C , FO , 1 7 , 18 , 3385 
<JH> 1165 DATA 6D,C3, 45, 85, 9C, AD, C8, 45, D 
O, 88, CE,C4, 45, AD, 84,45,18, 84, A9, 88,85,98 
,68,A5,8C,38,E9,3C,4A,4A,4A,0A,3689 
<LI> 1106 DATA A8,B9,6A,49,85,FC,B9,6B,4 
9, 85, FD, A5,88,38,E9,2C,4A,4A, A8,B1,FC,29 
, 7F,C9, 61, 96, 04, 89,72,96, 19, A5, 4318 
<IB> 1187 DATA FC, 18, 69, 58, 85, FC, AS, FD, 6 
9,OÖ,B5,FD,Bi,FC,29,7F,C9,61,90,86,C9,72 
,60,82,38,68, 18,68, AC,9C, 45, A5, 4127 
<HI> 1188 DATA 88, C9, 34, B0 , 06, B9, 9D , 59, 4 
C , 9C , 6C , C9 , C4 , 98 , 66 , 89 » 1D , SA , 4C , 9C , 6C , A5 
, 8CC9, 40, 88,86, B9,9D,5A,4C, 9C , 3949 
<P0> 1169 DATA 6C,C9,B7,5Ö,86,B9,1D,5B,4 
C,9C,6C,68,8D,9C,45,C9,FF,D8,83,4C,47,6D 
, A5,88,8D,D3, 6C , A5 , 8C , 8D , D4 , 6C , 4199 
<FH> 1118 DATA A9 , 88, 85, 88 , 85, 89, 85, 8C, 8 
S,8D,85,9A,85,9B,8D,A2,45,29,5C,66, AD,9C 
, 4 5, 26,88, 4D,ZO„D5,6C ,09,89,8», 3687 
<IF> 1111 DATA CB,45,60,88,88, AP,D4,6Cj,8 
5,8C, AD, D3, 68,85,88, C9, 34, BO, 88, A9,C3, 85 
, 88 , 8D , 9F , 45 , 6« , C9 , C4 , 98 , 08 , A9, 4148 
<EM> 1112 DATA 35 , 85 , 88 , 8ä> , 9F , 45 , 60, AS , 8 
C,C9,40,B8,Ö8,A9,B6,85,8C,8D, A8,45,68,A9 
, 41,85, 8C,8D, A6, 45, 60, 20, 43, 4C, 3779 
<KA> 1113 DATA AC, 99, 45, 89, 3F, 6D, BD, 9C, 4 
5,2O,06,4D, A9,4C,85,88,85,89,8D,9F,45, A9 
,85,85,8C,85,8D,80, A0,45, A9, 89, 3776 
<MN> 1114 DATA 85, 84 , A9, 11, 85 , 85, A9, 04, 8 
D, AS, 45, 28, SC, 66, 68, 06, 83, 09, 15, 24, 36, 45 
,5F, 68, 68, AD, 98,45,18,69,62, 20, 2644 
<JN> 1115 DATA 9E,6D,EE,99,45, AD, 99, 45, C 
9,B8,98,14,A9,O0,8D,99,45,EE,9D,45,AD,9D 
,45,C9,03,90,O5,A9,03,8D,9D,4S,3782 
<KL>. 1116 DATA 4C, Cl , 6F, AD, 99, 45, 18, 69, 1 
1, 8D, 74, 4A,8D,1B,4B, AD, 9D, 45, 18,69,11,88 
,72,4A,8D,19,4B,60,AE,9D,45,BD,3295 
<0L> 1117 DATA 9A,6D,AA,88,DO,FD,CA,D0,F 
A,68,14,11,8F,8C,8C,CB,6D,8E,CA,6D,0A,0A 
,8A,18,69,87, A8, A2, 05 , BD , 57, 4A, 3666 
<JK> 1118 DATA 79,CC,6D,C9,1A,98,02,E9,0 
A,9D,57,4A,88,CA,10,ED,28,FC,6D,AE,CA,6D 
, AG, C8,6D, 68, 88, 88, 80,68, 00, 88, 3417 
<NF> 1119 DATA 80,81,86,00,00,00,08,08,0 
6 , 88 , 85 , 88 , 00 , 88 , OO , OO , 88 , 85 , 00 , OO , 00 , OO 
,88,00,01,08,08,80,08,88,00,00,12 
<KA> 1128 DATA 01,65,00,68,80,88,88,88,0 
2,80,O8,68,A0,O6,B9,57,4A,D9,D8,49,90,19 
,F8,O2,B0,07,C8,C0,68,D0,EF,F0,2699 
<PL> 1121 DATA 8E, AO, 85,69,57, 4A, 99, D8, 4 
9,99,22 J 8E,88,lß,F4,A0,8O,68,86,eo,8O,B0 
,88,08, AD,FC,82,C9,21,D0,8C,A9,2966 
<&!> 1122 DATA FF, 8D, FC, 82 , AD, 78 , 82 , C9, 8 
F,F0,F9,60,48,8A,48,98,48,A9,08,8D,8C,47 
, A2, 00, A9, 86, 06,02,28, 8D, 47, 88, 3620 
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<L!» 1123 DATA A8 , 68 , AA , 68, A2 , 64 , BD , 9A, 6 

E,8S,84,BD,9F,6E,85,85,4C,65,6E,00,O0,,A9 

, 00 , 8» , 63 , 6E , 8D , 64 , 6E , AD , 63 ., 6E , 3693 

<HD> 1124 DATA 18,69 J fli,8D,63 J 6E,ä& J ,fi4»6 

E,69,00,8D,64, 6E, C9, OD, 90 , EB , AD, 63, 6E, C9 

, AC , 90 , E4 , C A , lO , CA , CE , AA , 45 , 2B , 3936 

<JG> 1125 DATA 77, 4A, AD, AA , 45, F0, OD , 4C , B 

E,6F,2E,2D,2C,2B,2A,3O,30, 30, 2F, 2F , 20, IC 

,4B,A2,00,BO,O9,6F,9D,50,81,4C,274i 

<MA> 1126 DATA B4, 5E, OO, 0O, A9, OO, 8D, B2, 6 

E,8D,B3,6E, AD , B2 , 6E , 18 , 69 , Ol , 8D , B2 , 6E , AD 

, B3, 6E, 69, OO,8D,B3,6E,C9,0F, 98,3695 

<MH> 1127 DATA EB, AD, B2 , 6E, C9 , AO, 90 , E4, E 

8,E0,O9,90,CC,4C,E2,6E,00,00, A9,O0,8D,EO 

, 6E,SD,Ei,6E, AD,E8,6E,18,69,01,44il , 

<MF> 1128 DATA 8D, EO, 6E, AD, E1,6E, 69, 00 , 8 

D,E1,6E,C9,61,90,EB, AD,EG,6E,C9,A8,9Ö,E4 

,4C,B3,6F,27, 21 , 2D , 25, 00, 2F, 36, 4115 

<GC> 1129 DATA 25, 32, AD , C7, 45, 29 , flC, DO, O 

1,60, A9,0O,20,9E,6D,A5,A0,A2,02,DD,6S,6F 

,B8,G3,CA,10,F8, A9,O0,9D,BF,45,35O7 

<DF> 1130 DATA 85, 9C, AC, 9C, 45, E0, 00, DO, 8 

6,99,08,91,4C,4C,6F,E8,01,DO,Ö6,99,8fl,9± 

,4C,4C,6F,99,00,92,48,8A,48,98,3546 

<GM> 1131 DATA 48, A9, OO, 8D , 8C, 47 , A2, 02, A 

9, Oft, A0,O5,2O, 8D, 47,68, A8 , 68, AA, 68,60,44 

,74,A4,AD,CB,45,FO,Q4,CE,CB,45,3606 

<HP> 1132 DATA 60 , AD, CS , 45, 29 , ÖC , DO , 08 , A 

D,C6,45,29,O2,DO,Oi,60,68,68,4C,3C,6E, AD 

,OC,DÖ,8D,C5,45,AD,0D,D0,29,0C,3293 

<LC> 1133 DATA FO , G3 , ÖD , CS , 45 , AD , OA , DO » 8 

D,C7,45,AO,04,D0,8D,C6,45, AD, 05, DD, FO, 03 

,8D,C6,45, AD,O2,D0,8O,C8,45, A9,4242 

<B0> 1134 DATA 03 , 8D, IE , DO, 60 , 20 , D7, 48, 2 

G,CC,4B,2O,D7,48,20,77,4A,20,73,6D,20,A4 

,4A,2O,G0,6D,28,28,6E,2O,8C,6D,2795 

<IE> 1135 DATO 20, 17, 67, 20, 4F, 69, 28,38,5 

i,28,6C,6C,20,12,6F,2O,68,6F,4C,CA,6F,EA 

,00,00,00,00,80,00,00,00,00,00,1822 

<CF> 1136 DATA 08,08,00,00,00,00,00,00,0 

O, 00, 00,00,00, 00,00,00 ,80, 00,00,00,00,08 

,00,00,00,18,18,18,18,88,18,80,120 

<IM> 1137 DATA 00,66,66,66,00,00,08,00,0 

6, 66, FF, 66, 66, FF, 68, OO, 18, 3E, 68, 3C, 86, 7C 

, 18,00,00, 66, 6C, 18, 30,66,46,00, 2074 

<FO> 1138 DATA IC, 36, IC, 38, 6F, 66 , 3B, OO, O 

O, 18, 18, 18, 00 ,60, OO, 00, 00, OE, IC, 18, 18, IC 

,0E, 08, OO, 70, 38, 18, 18, 38, 70,00,1826 

<KM> 1139 DATA OO, 18, 00, 3C, 18, 18 , 24, 00, 8 

8, 18, 18, 7E, 18, 18, 00,00,00, 00, 80,80,80, 18 

,18,30,00,00,00, A8, 0O, 00,00,00, 654 

<PP> 1140 DATA OO, QO, OO, 80, 00, CO, CO, O0, O 

0,86, 0C, 13, 30,68,40, 00, 80,20,38, 88, A8, 88 

,28,00,00,20, AO, 28,20,28, A8,OD, 1738 

<ED> 1141 DATA 00,20,88,88,20,88, A8, 00,8 

0,A8, 08,20,20,08, A8, 00, 00, 88, 88, 83, 28, 88 

,03,00,00, A3, 80, AO, 08, 83, 28, 80,2016 

<AJ> 1142 DATA 00, 20 , 80, AO, 83 , 88 , 20, 00, 

8, A3, 08, 20, 20, 80, 88, 00, 00, 20, 38, 20, 88, 88 

,20,00,00,20,88,23,88,08,20,00,1880 

<CH> 1143 DATA 00, 00 , CO, CO, OO, CO , CO, OO, O 

8, 00, 18, 18, 00,18,18, 30, 06, OC , 18, 30, 18, OC 

, 05,00,00, OO, 7E, OO, OO, 7E, 00, OO, 1296 



<JD> 1144 DATA 60 , 30, 18, OC, 18 , 30, 60, OO, O 

O, 3C, 66, OC, 18 B 00,18,08,00,3c, 66, 6E,6E, 68 

,3E, 00,00,20, AB, 88, 88, A3 ,88,00,1886 

<IL> 1145 DATA OO, AO , 88, Aß, 88, 88 , A0, 0O, O 

O , 20 , 88 , 80 , 88 , 88 , 20 , OO , 80 , AO , 38 , 88 , 88 , 88 

, A0,O0,0O,A3,8O, A3, 88, 30, A3, 00,3232 

<HG> 1146 DATA OO, A8 , 80, A8, 80 , 88, 88, OO, 

O, 28, 80, 80, 88, 88, 28, 00, OO, 88, 88, A8, 88, 88 

,88, 00, 08, A3, 20,20,20, 20, A3, 00, 2768 

<HÜ> 1147 DATA 00,08,88,08,08,88,20,00,0 

O , 88 , 83 , AO , AO , 88 , 88 , OO , 00 , 88 , 80 , 80 , 80 , 80 

, A3, OO, 00, 88, A8, A3, 88, 88, 88, 68, 2752 

<I0> 1143 DATA 00,A0,A8,88, 88, 88, 88,00,6 

O, 28, 88, 88, 88, 88, 28, 00, OO, AO, 88, 88, A0, 80 

, 80, 00, 00, 20,88,83, 88, AO, 28, 80, 2968 

<FJ> 1149 DATA OO , AO, 88, 88, A0, 88, 88, 08 , O 

0,28,88,20,O8,O8,AO,O8,0Ö,A8,2O,2O,2O,20 

, 20, 00, 08, 88, 88, 88, 38, 83, A3, 0O, 2416 

<F1> 1150 DATA 00,88,88,88,88,20,28,80,0 

O, 88, 88, 88, A8, A3, 88, 0O,OO,88, 83, 28, 20, 88 

,88,00,00,88,88,20,20,20,20,00,2496 

<ÜL> 1151 DATA 00, A8, 08,20,20, SO, A8, 08, O 

0, IE, 18, 18, 18, 18, iE, OO, 80, 40,60,30, 18, 0C 

,06,00,00,78,18,18,18,18,78,00,1278 

<AF> 1152 DATA 0O, 08, IC , 36 , 63, 80, OO , 00, 7 

E, 81, 9D, AI, AI, 9D, 81, 7E, OO,00,0O, 00,00,00 

, 00, 00, 00 ,08, 00, 00, 00,00 »OO., 00 j* 333 

<JE> 1153 DATA 00,00,00,00,00,00,08,00,8 

O , OO , ÖO , 0O , OO , 00, OO, O0 , 00 , OO , OO , 00 , CO, OO 

,00,00,00,00,00,00,00,08,08,00,0 

<EK> 1154 DATA 00,00,00,88,00,00,00,00,5 

0,A5,AA,AA,AA,AA,A9,A8,OO,45,9ft,9A,86,41 

,08, 28, 54, A9, AA, AA,AA, AA, A9, A8,31S6 

<IH> 1155 DATA 50 , A4 , A9, A9, A9 , 95, 44, 24, 1 

5,84,1A,1A,1A,1A,05,04,4O,OA, AA,AA,AA,AA 

,AA,AA,AA,A9,A4,A2,91,48,2A,2A,3282 

<GH> 1156 DATA 02 , 2A, AA , AA, AA, AA, 2A, 0A, A 

9,A9, A9, A9, A9, A9,A4, A4 , 06 , 1A , 1A , 1A , 1A , 16 

, 65, 08, 14, 82, 8 A, 82, AI ,90, 45, 00, 3047 

<EH> 1157 DATA AA , AA , fi A , AA , AA , 6A , 15 , 08 , 8 

O,A2,A2,8A,8ft,46,41,14,50,Ö4,A9,A9,A9,A9 

,S4,0O,OO,Gi,O&,lA,lA,lA,lA,lA,2841 

<GD> 1158 DATA CO , CO , CO , CO , CO , CO , CO , CO , O 

O, 08, 0O, FF, FF, 18, 18, 18, 18, 18, 13, FF, FF, 08 

,0O,Oe,F0,FO,F8,F6,FO,FO,F8,F0,462O 

<IJ> 1159 DATA 18, 18, 18, 1F,1F, 08,80,00, 7 

8, 60, 78, 68, 7E, 18, IE, OO, OO, 18, 3C,7E, 18, 18 

,18,80,00,18,18, 18, 7E,3C, 18,00,1310 

<KC> 1168 DATA 00 , 18 , 38, 7E , 30 , 18 , OO , 00 , O 

8,18,0C,7E,OC,18,OO,OO,OO,18,3C,7E,7E,3C 

,18,88,08,01,87,1F,1F,1F,1F,1F,1051 

<AE> 1161 DATA 50, F5, FF, FF , FF, FF, FD , FC, O 

0,4S,DF,DF,C7,41,0C,3C,S4,FD, FF, FF, FF, FF 

, FD, FC, 50, F4, FD, FD, FD, »5,44,34,5979 

<KI> 1162 DATA 15, 04, 1F, 1F , 1F, 1F, 05, 04, 4 

O,0F,FF,FF,FF,FF,FF,FF,FF,FD,F4,F3,D1,4C 

,3F,3F,O3,3F,FF,FF,FF,FF,3F,0F,4337 

<GK> 1163 DATA FD , FD, FD , FD , FD, FD, F4 , F4, O 

7,1F,1F,1F,1F,17,05,OO,14,C3,CF,C7,F1,DO 

, 45, 00, FF, FF, FF, FF, FF, 7F, 15, OO, 4727 

<GI> 1164 DATA CO, F3, F3 , CF , CF, 47, 41 , 14, 5 

O,04,FD,FD,FD,FD,54,OO,0D,33,DC,F7,DD,F7 

,FD,0F,CO,3C,DF,77,DF,77,DF,7C,4978 
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<K0> 1165 DATA CB.FFjSF.OF.OS.SF.FF.FO.F 
0,EC,FB,7A,FE,FE,FF,3C,55,7D,FF,FF,FF,FF 
, 7D , 55 , 08, 20 , A8 , BE , AE , 2A , 2A , GS , 4854 

<jx> nee data 00,00,00,00,00,00.00,00,0 

0,00,00,00,00,08,00,00,00,00,00,00,00,00 

,00,00,00,00,00,00,00,00,00,00,0 

<X0> 1167 DATA 00,00,00,00,00,00,00,00,0 

0,14,7»,7D,7D,28,3C,FF,18,18,18,I8,18,18 

, 18 , 18 , OO , 7E , 78 , 7C , 6E , 66 , 86 , 00 , 1530 

<BD> 1168 DATA 08,18,38,78,38,18,08,00,1 

O, 18, IC, IE, IC, 18, 10, 9B, 00,00,00, 00,00,00 

, OO , OO , 00 , 3C , 3C , 3C , 18 , OO , 18 , 00 , 845 

<BH> 1169 DATA OO, OO, OO, EO, FE, OO , OO, 00,5 

5,55,7F,77,7F,75,7F,5S,55,5D,55,5D,5D,5D 

, 5», 55, 55, 75,75, 77, 7D, 77, 77,55,3084 

<DJ> 1170 DATA 55,70,50, 5D,5D, SD, 7F, 55, 5 

5, 55, 7F, 77, 77, 77, 77, 55, 00,0E, IC, 18, 18, IC 

,OE,00,55,55,7F,77,77,77,7F,55,265Ö 

<KI> 1171 DATA 18,18,42, 3C, 18, 18, 24,42,5 

5, 55, 7F, 77, 77, 7F, 75, 75, 55, 75, 75, 7F, 77, 77 

,77,55,00,00,80, 7C,3E, 00,80,00,2294 

<CT> 1172 DATA OO, 00, OO, 00, 08, IC, IC, 08, 5 

5,55,7F,75,7F,57,7F,55,00,3E,67,4B,53,67 

, 3F , IE , 00 , IC , 3E , 5E , IE , 3E , 7F , 7F , 1961 

<I0> 1173 DATA 00,3E,67,OF,1E,3C,7F,7F,0 

O,7E,0C,i8,0E,77,7F,3E,0O,OC,lC,3C,6E,7F 

,7F,8E,0O,7E,6O,7E,07,67,7F,3E,2133 

<TH> 1174 DATA 00 , 3C, 60, 7E, 67, 7F, 7F, 3E, O 

O,7F,07,0E,1C,3C,3C,3C,0O,3C,66,3E,67,7F 

,7F,3E,O0,3C,66,3F,07,4F,7E,3C,2197 

<IB> 1175 DATA 00,00,70,70,00,70,70,00,5 

5, 55, 77, 77, 77, 77, 7F, 55, IC, 36, IC, 38, 6F, 66 

, 3B , OO , OO , OO , 7E , 00 , 00 , 7E , OO , OO , 1996 

<AL> 1176 DATA 68, 30, 18, OC, 18, SO, 68, 00, 5 

5, 55, 77, 77, 7F,7F, 77, 55, 55, 55, 77, 77, 77, 7F 

,57 , 7F , OO , 18 , 3E , 7F , 67 , 7F , 7F , 67 , 2755 * 

<LF> 1177 DATA 00, 7C, 66, 7E, 67, 7F, 7F, 7E, O 

O,3C,66,60,73,7F f 7F,3E,O0 f 78,6E,67,6F f 7F 

, 7F , 7E , 00 , 7F , 78 , 7F , 78 , 7F , 7F , 7F , 3223 

<H0> 1178 DATA 00, 7F, 78, 7E, 78, 78, 7C , 7C, O 

ö,3E,70,76,73,7F,7F,3E,O0,77,77,7F,7F,77 

, 77, 77, OO, 7E, IC , IC, IC, 7F, 7F, 7F, 3016 

<DE> 1179 DATA OO, 07, 07, 07, 4F , 7F, 3F, IE, O 

Ö, 77, 76, 7C,7C,7E, 77, 77,08,70,70, 70, 7F,7F 

, 7F,7F,00, 63, 77, 7F, 66,63,77, 77, 2802 

<GH> 1180 DATA 00,67, 77, 7F, 7F, 7F, 6F, 67, O 

O,3C,67,67,67,7F,3F,1E,O0,7C,66,67,7F,7E 

, 70 , 70, OO, 3C, 67 , 67 , 67 , 7F , 7E , 3D , 2895 

<JT> 1181 DATA 00,7C,67,67,7F,7E,76,7B,O 

0,3C,60,3E,07,3F,7F,7E,00,7F,7F,7E,3C,3C 

,3C,3C,00,67,67,67,7F,7F,7F,7E,2801 

<DH> 1182 DATA 00, 67 , 67, 67 , 77, 3F, 1E,0C, O 

8,63,6B,6B,7F,7F,77,63,O0,67,67,3C,3C,7F 

, 77, 63, OO, 67, 67, 3E, IC, IC, IC, IC, 2369 

<HD> 1183 DATA 00, 7F, OE, IC, 3C, 7F, 7F, 7F,5 

5,55,55,50,55,5D,55,55,55,5D,5D,5D,5D,55 

,5D,55,55,55,55,55,55,5D,5D,7D,2782 

<DJ> 1184 DATA 80, 08, IC, 36, 63, ©O , 00, 00, O 

0,7E,81,BD,A1,8D,81,7E,55,5D,5D,5D,5D,5D 

,5D,55,02,O2,0A,2A,2A,2A,2A,AA,2318 

<JL> 1185 DATA 80, 80, 80, AO, A8, A8, AA, AA,0 

2 , 8A , AA , 8 A , 8 A , A2 , AO , A8 , OA , OA , 2 A , 2 A , 2 A , AA 

,AA,AA,02,e2,e2,eA,0A,eA,0A,eA,3008 



<FK> 1186 DATA 88, 80 , 80, AO , AO, AO, AO, AO, A 

8,A8,A8, A8j A3, AB, Aft, AA,AA, AA, AA,AA,AA,AA 

, AA, AA, 30,88, AA , AA , AA , AA , AA , AA, 5152 

<D0> 1187 DATA 55, 5F, 5D, 7F , 5D, 5D, 5D, 55 , 5 

5,55,7F,77,77,7F,57,7F,SS,7S,7S,7F,77,77 

,77,55,55,55,55,55,55,55,55,55,3208 

<AH> 1188 DATA 03, 03, OF, 2F , 3F, 3E, FA, AA, C 

0,C0,C0,E0,F8,B8,AE,AA,5S,5S,55,55,55,75 

,75,55,00,06,00,00,00,00,00,00,2933 

<CK> 1189 DATA AA, 9A, 55, 55, 55, 55, 55 , 55, F 

F,FF,D7,D7,D7»D7,FF,FF,FF,FF,FF,C3,C3,C3 

,FF,FF, AB,EB,EF,BF,FE,FE,FB,AB,6340 

<JP> 1190 DATA 0A,0A,0A,0A,O2,O2,O2,OO,A 

fi,9A,59,55,55,55,S5,55,AA,9A,96,55,S5,55 

,55,55,AA,BB,BB,BB,BF,BF,AE,AE,3244 

<FP> 1191 DATA AB,AB,AF,AF,B3,B3,FF,FF,7 

8,60,78,60,7E,18,1E,00,00,18,3C,7E,18,18 

, 18, OO, 00,18,18, 18, 7E,3C, 18,00,2736 

<1M> 1192 DATA OO, 18, 30 , 7E, SO, 18 , 00, 00, O 

O,18,0C,7E,OC,18,00,00,55,7F,57,5F,57,57 

,7F,55 J EA,Eft,FA,FA,CE,CE,FF,FF,3138 

<DL> 1193 DÖTA FF, FF, B3, B3, AF, AF, AB, AB, F 

F,FF,CE,CE,FA,FA,EA,EA,00,06,06,3E,66,66 

,3E,00,0O,00,3C,66,7E,60,3C,OO,4234 

<FE> 1194 DATA OO, OE, 18, 3E, 18, 13 , 18, OO, O 

0,00,3E,66,66,3E,06,7C,00,30,30,3F,33,33 

, 33, 00,00,18, 00, 38, 18, 18, 3C, 00, 1130 

<HF> 1195 DflTft 00,06, 00, 06,06,06, 06, 3C, O 

0,60,6O,6C,78,6C,66,00,00,38,18,18,18,18 

, 3C, 00, OO,0O, 66, 7F,7F, 6B, 63, OO, 1494 

<TB> 1196 DATA OO, OO, 7C, 66, 66, 66, 66, 00,0 

8, 00, 3C, 66, 66, 66, 3C, 08, 00, 00, 7C, 66,66,7c 

, 60, 60, OO, 00, 3E, 66, 66, 3E, 06,86,1942 

<JC> 1197 DATA 00,00,7C, 66, 66, 60,60,00,0 

O,00,3E,60,3C,06,7C,0O,00,18,7E,18,18,18 

, OE, 00,55, 77, 77, 77, 7F, 57, 57, 55, 1926 

<GH> 1198 DATA 55, 7F, 75, 7F, 57, 57, 7F,5S, 5 

5,7F,75,7F,77,77,7F,S5,55,7F,57,57,57,57 

,57,55,55,7F,77,7F,77,77,7F,55,338B 

<PF> 1199 DATA 55, 7F, 57, 57, 7F, 75, 7F, 55, O 

O,18,3C,7E,7E,18,3C,O0,18,18,18,18,18,18 

, 18, 18, 00,7E, 78, 7C,6E, 66, 06,00,2042 

<KP> 1200 DATA 08,18,38,78,38,18,08,00,1 

0, 18, IC, IE, IC, 18, lO, 98,00,00,00, 00,00,0« 

,00,00,00,80,00,00,00,00,00,00,617 

<I0> 1201 DATA 00,00,00,00,00,00,00,00,0 

0,00,00,00,00,00,00,00,00,00,00,00,00,00 

,08,00,00,00,00,00,00,00,00,00,0 

<IP> 1202 DATA 00,00,00,00,00,00,08,00,0 

0,00,00,00,00,00,00,00,00,00,00,00,00,80 

,80,00,00,00,00,00,00,00,00,00,0 

<JA> 1203 DATA 00,08,00,00,00,00,00,00,0 

8,00,00,00,00,00,00,00,00,00,00,00,00,00 

,08,00,00,00,00,00,00,00,00,00,0 




<CG> 100 DIM C10$C483 , PUFFERS C2ÖOOOJ ,E5E 
CC23,S5ECC2» 
<AF> HO FAHZftHL=2 " 
<DA> 111 S5ECfia=l:ESECCll=Sl 
<JG> 112 55ECC2J=52:E5ECC2>~102 
<GM> 140 GRAPHICS 8 ä 5ETC0L0R 2,8,81? "A3 

"S? "«C» 1 



•• IMTO DEEP 1.8* Linker ••• 
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937 by Frank T. Hitten«ayer" 

<FL> ISO RESTORE 90O:F0R H~X TO 40 : READ 

A : CIOS CK3 -CHRS tAi i MEKT K 

<K0> 2O0 FOR FILE=1 TO FAMZAHL 

<KG> 210 G05UB 300 

<PD> 220 HEXT FILE 

<LM> 23Ö GOSUO 6O0:END 

<mb> 3oe ? :? "cassette »iL ";file;". Fi 

le einlegen":? "KL-ÜUllW 

<CO> 310 OPEN t*l,4,128,"e:" 

<HP> 320 ERR=USRCADR«CIO$3 , 1, 7, ADR CPUFFE 

R$3 *5SEC CFILE>*128-128, CESEC CFILEJ -SSEC C 

FILE3 +13*128;) 

<BK> 330 IF ERR>127 THEM 2 "».T.U+^JdikJkJ 



<HL> 340 CL05E «fl: RETURN 

<0B> 600 ? :? "Uercassette einlegen, KU 

E0I3ar*:0PEH »1,8, 128, "C:" 

<EK> 61Ö ERR=U5RCADRfCI0S3 , 1, 11, ADR CPUFF 

ERS3 , CESEC tFAHZAHLJ -SSEC «13+13*1283 

<BM> 628 IF ERR>127 THEM 2 "E££Ä3333^5J 

<HH> 630 CL05E ttl:RETURH 

<KG> 900 DATA 104,104,104,24,10,10,10,10 

, 170 , 104 , 104 , 157 , 66 , 3 , 104 , 157 ,69,3, 104 , 1 

57,6», 3, 104, 157,73,3, 104,157 

<DK> 910 DATA 72,3,32,06,228,132,212,169 

,0,133,213,96 




Noch mehr Waben zum Laben! 



m 



Das gab es noch nie in derComputronic: Ein 
Spiel für zwei Systeme in einer Ausgabe! Die 
Gebrüder Reite haben in dieser Ausgabe das 
erste Double geschafft. Das Spiel 'Die Biene 
Maja' haben wir nicht nur für den C-64, son- 
dern auch für den Atari 800XL/130 XE in 
dieser Zeitschrift! 

Die Spielanleitung ist für die Atari-Version 
natürlich genau die gleiche wie bei der 
Commodore-Version. Trotzdem werden 
wir nochmals eine kurze Einführung ge- 
ben, damit unsere Atari-User nicht das gan- 
ze Heft nach der Anleitung durchstöbern 
müssen. 

Die liebe Maja muß ihr Bienenvolk mit 
Nahrung (Nektar) versorgen. Leider gibt es 

*** BXEHE MAJA *** 

*** HRITTEN BY «** 

*HW* C, REITZ *** 

*** CC3 9.1986 *** 

MKMMKKMKKKtHtKMWBK ie 

«":POKE 559,0!AD=34816IPS=O:ZL 
AS (2) 
X=Q TO 4264 STEP 8 : 5=0 : RESTQR 

T=0 TO 7 
iD AS 
:ASCtAStl,13 3 !H=H-4SSIF H>16 TH 
EH H = H~7 

<CE> 12 L=ASGtA$C2,Z3 3 
EN L=L-7 

<AE> 13 MERT=H*16+L 
<ÖE> 14 POKE AD+I+T, 
<MH> 15 HEKT T : READ 
559,34:? "DATAERROR 



IIIIIIIIIIIIIIMIIIIIIIIIIIIIihlilllllll lllllll II I Hill HUI IUI illllll llllllillllllll 
in der Nähe nur eine Blume, wo die Imme 
Nektar laden kann. Ausgerechnet diese 
Blume muß am Ende des Feldes stehen. Na 
dann mal den Joystick anklemmen, und 
nach rechts oder links losbrummen. Durch 
schnelles Drücken des Feuerknopfes ge- 
winnen Sie an Flughöhe. 
Es erwartet Sie ein hartes Stück Arbeit, da 
Sie nicht nur den Blumen und Vögein aus- 
weichen müssen, sondern auch noch gegen 
die Zeit fliegen. Für den Hin- und Rückweg 
bleiben Ihnen jeweils 5000 Zeiteinheiten. 
Haben Sie die Nektarblume erreicht, gilt es 
knapp über ihr eine Position zu halten, um 
die süße Fracht zu laden. Wieder am Bie- 
nenkorb angekommen, wird im gleichen 



Stil entladen, bis der Level steigt. Denken 
Sie also an Ihren fetten Freund Willi, der 
riesigen Hunger hat! 

Zum Laden: 

Sie brauchen das Programm nur abzutip- 
pen, mit 'RUN' zu starten und dann drei 
Minuten zu warten. 

Nun müssen Sie noch das Gerät eingeben, 
worauf abgespeichert werden soll (Disk./ 
Kass.). 

Die Disketten-Version läßt sich mit der L- 
Funktion im DOS laden. 
Die Kassetten-Version ist eine Boot-Ver- 
sion, die also mit gehaltener Starttaste ge- 
laden wird. 



<I0> 


2 REH 


<HL> 


3 REM 


<B»> 


4 REM 


<0I> 


5 REM 


<A0> 


6 REM 


<MF> 


7 2 " 


=1O0O :DIM 


<LK> 


FOR 


E ZL 




<LL> 


9 FOR 


<0C> 


IO RE 


<AJ> 


11 H= 



L=L~48SIF L>16 TH 



SOUND O, WERT,18,T+8 
WERT:S=5+WERT 
AUF A<>S THEM POKE 
IM ZEILE "jZL:STOP 



<IH> 16 ZL=ZL+l5PS=PS+5 

<PA> 17 MEKT I 

<BC> 16 IF PS<>432771 THEK 2 "GESAMTDATA 

5 SIHD HICHT KORREKT" ! POKE 559, 34 S STOP 

<PC> 19 GRAPHICS O: SOUND 6,0,0,0 



"GJlSCKETTE ODER SASSETTE 



IN 



<I1F> 20 

PUT AS 

<CC> 21 DXH B5C103 :B5="D : MAJA. COM" EB$C1, 

13 ~A$ Ci, 13 : LG=4272 : Wl=© 

<I>P> 22 IF A5Ci,l)<>"l>" THEN Rf STORE 100 

:FOR 1=0 TO 5: READ AiPOKE 34316* I, A : HEXT 

I :LG=LG+80 : Wi-128 
<KJ> 23 POKE 559,0:POKE 712 , 250 : RESTORE 
110: FOR 1=1536 TO 1608 : READ A i POKE I,A;N 
EKT I 

<0H> 24 OPEK tti,8,Hl,B$:A-USRC1536,ll,34 
816, LG3 

<BN> 100 DATA 0,34,247,31,253,31 
<HC> HO DATA 104,104,104,162,164,157,66, 
3,104,157,69,3,104,157,68,3,104,157,73,3 
,104,157,72,3,32,86,220 

<IP> 120 DATA 169,12,157,66,3,32,86,228 
<ÖE> 130 DATA 169,9,133,204,169,136,133, 
205,169,0,133,206,169,32,133,207 
<HK> 140 DATA 160, O, 177 , 204, 145, 206 , 200, 
208,243, 230, 2 OS, 230, 207, 165, 207,201, 49, 2 
08,239, 76,141,48 

<0I> 1000 DATA FF,FF,FD,lF,ftO,30,4C,8D,1219 
<KL> 1001 DATA 30,00,00,00,00,00,00,08,48 
<CC> 1082 DATA 00,55,55,55,55,55,64,54,593 
<AC> ±0O3 DATA 54,55,55,55,41,00,00,00,404 
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<AJ> 
<CO> 
<BF> 
<AH> 
<DI> 
<PM> 
<BE> 
<AE> 
<0G> 
<AD> 
■CAII> 
<AB> 
<B8> 
<BL> 
<PF> 
<BG> 
<AE> 
<AG> 
<AE> 
<AK> 
<AL> 
<BM> 
<PP> 
<BJ> 
<PM> 
<CH> 
<AJ> 
<BA> 
<BB> 
<KK> 
<AI> 
<AE> 
<BA> 
<BP> 
<BO> 
<BP> 
<AO> 
<AX> 
<0A> 
<GF> 
<JH> 
<LF> 
<I_A> 
<AI> 
<BP> 
<IIJ> 
<PI> 
<PJ> 
<AF> 

<»o> 

<FP> 
<BL> 
<JK> 
<tlA> 
<AO> 
<HE> 
<FJ> 
<DG> 
<CH> 
<FI> 
<DI> 
<DL> 
<PH> 
<MK> 
<EI> 
<CH> 
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1017 
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1D31 
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1835 
1036 
1037 
1038 
1039 
1048 
1641 
1042 
1843 
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1045 
1046 
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1048 
1049 
1050 
1051 
1052 
1053 
1054 
105S 
1056 
1057 
1058 
1059 
1060 
1061 
1862 
1663 
1664 
1065 
1066 
1067 
1058 
1069 
1070 



DATA OO 

DATA 55 

DATA 55 

DATA 41 

DATA 54 

DATA 54 

DATA 15 

DATA SO 

DATA 15 

DATA 08 

DATA 15 

DATA 14 

DATA 54 

DATA 54 

DATA Ol 

DATA 54 

DATA 15 

DATA 14 

DATA 51 

DATA 58 

DATA 54 

DATA 15 

DATA 05 

DATA 50 

DATA 15 

DATA 51 

DATA 55 

DATA 15 

DATA 00 

DATA 15 

DATA 80 

DATA 15 

DATA 15 

DATA 55 

DATA 05 

DATA 45 

DATA 15 

DATA 15 

DATA 80 

DATA 7C 

DATA 30 

DAJA FE 

DATA 7C 

DATA 06 

DATA 78 

DATA 7C 

DATA 18 

DATA 7C 

DATA 7C 

DATA 88 

DATA 0E 

DATA 78 

DATA 02 

DATA FF 

DATA F8 

DATA 88 

DATA 80 

DATA 81 

DATA 57 

DATA DD 

DATA 00 

DATA 05 

DATA 08 

DATA 80 

DATA 3A 

DATA A8 

DATA Ol 
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,55,55, 
,00,01, 
, 54, 58« 
,55,55, 
,00,00, 
,55,15, 
,00,08, 
,00,08, 
,00, 05, 
,00,45, 
,00,58, 
,15,15, 
,15,15, 
,50,48, 
,00,54, 
,08,58, 
,00,15, 
,00,48, 
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,14,14, 
,55,55, 
,48,88, 
,54,54, 
,88,08, 
,8S,15, 
,15,15, 
,51,55, 
,55,55, 
,08,00, 
,15,15, 
,80,15, 
,40,54, 

,54,54, 

,80,05, 
,15,15, 
.15,15, 
,7C,FE, 
,18,78, 
,7C,FE, 
,7C,FE, 
,0E,1E, 
,FE,FE, 
,7C,FE, 
,7E,FE, 
,7C,FE, 
,7C,FE, 
,00,18, 
, OE f IC, 
,70, 38, 
, 00,80, 
,08,OA, 

,08,80, 

,08,00, 
,2A,OA, 
,BF, AA, 
,AA,6A, 
,00,00, 
,15,77, 
,81,41, 
,77,5F, 
,55,74, 
,00,08, 
,00,01, 
,00,54, 
, 00,00, 



54,55 
55,55 
55,55 
40,O0 
55,55 
08, OO 
15,15 
0O,15 

00,00 

55,55 
55,55 
54,55 
15,15 
14,15 
00,08 
55,15 
54,55 
55,55 
50,54 
15,15 
14,14 
50,54 

00,00 

55,15 
00,40 
15,55 
15,15 
55,55 
55,55 
00,80 
15,15 
55,54 
55,15 
54,50 
15, 05 
55,55 
15,15 
55, 54 
C6,C6 
r o jf 18 
06, OC 
06, IC 
3E,66 
CB,FC 
C8,FC 
0C,18 
C6,7C 
C6,FE 
18, 30 
38,78 
1C0E 
O0, 2A 
OA,0A 
08, 2A 
00,00 
08,80 
OA,OA 
52, 50 
00, OO 
5D,5F 
55, FS 
FS, 74 
50,00 
OO,00 
15,54 
55,15 
OD, 48 



,55, 
,55, 
, 55, 
,00, 
,55, 

,00, 

,55, 
,55, 
,48, 
,55, 
,14, 
,05, 

,55, 
,01, 
,15, 
,15, 
,58, 
.14, 
,15, 
,15, 
,54, 
,05, 
j X5 j 
,40, 
,55, 
,15, 
,15, 
,15, 
,80, 
,15, 
,40, 
,05, 
,54, 
,15, 
, 55 , 
,15, 
,54, 
,C6, 
,18, 
,38, 
,1C, 
.FF, 
,FE, 
,FE, 
, 18 , 
,FE, 
t 7E, 
,00, 
,70, 
,0E, 
,2A, 
,AA, 
, AA, 
,88, 
,08, 
,08, 
,50, 
,15, 
,15, 
,DS, 
,50, 
,08, 
,01, 
,50, 
,05, 
,50, 



15,15, 
55,55, 
55,55, 
50,54, 

55,55, 
55,54, 
55,55, 
40,40, 
15,15, 
14,14, 
05,15, 
55,55, 
45,45, 
45,55, 
15,15, 
15,14, 
50,58, 
14,54, 
15,15, 
15,15, 

JL »> jf JLo j 

14,54, 
15,15, 
40,51, 
55,55, 
15,15, 
15,04, 
15,15, 
00,00, 
15,15, 
00,O0, 
05,15, 
15,15, 
55,55, 
55,15, 
15,15, 
00,00, 
C6,FE, 
18,38, 
E6,FE, 
06, FE, 
FF, 06, 
06, FE, 
C6.FE, 
18,18, 
C6,FE, 
06, FE, 
08, 88, 
38, IC, 
IC, 38, 
SA, 86, 
BF, FF, 
EB,F8, 
86,88, 
68,00, 
80,00, 
50,51, 
5D,F5, 
81,80, 
45,05, 
O0,OO, 
00,08, 
03, ÖE, 
80, AC, 
05,01, 
58,50, 



448 

680 

511 

457 

679 

254 

423 

356 

213 

302 

320 

308 

359 

398 

308 

337 

332 

451 

433 

227 

227 

481 

178 

417 

294 

468 

232 

403 

483 

21 

147 

275 

306 

481 

390 

435 

168 

316 

1424 

648 

982 

954 

848 

1472 

1652 

1438 

1340 

220 

406 

322 

206 

656 

931 

376 

52 

389 

680 

446 

571 

683 

660 

281 

18 

592 

372 

385 



<EG> 
<JH> 
<BD> 
<DT> 
<F8> 
<EF> 
<FJ> 
<BM> 
<MB> 
<B0> 
<CN> 
<LH> 
<1C> 
<ÜD> 
<DL> 
<EO> 
<CP> 
<FE> 
<GA> 
<8G> 
<0P> 
<PH> 
<BP> 
<DL> 
<AL> 
<PL> 
<DJ> 
<KD> 
<OX> 
<ND> 
<LM> 
<HA> 
<ME> 
<MN> 
<NK> 
<GA> 

<LE> 
<IM> 
<PC> 
«PC> 
<ND> 
<MG> 
<HF> 
<PD> 
<HL> 
<EF> 
<LG> 
<KM> 
<LF> 
<MA> 
<GL> 
<MA> 
<JC> 
<HH> 
<FD> 
<IIP> 
<AH> 
<CF> 
<AC> 
<HA> 
<H8> 
<EG> 
<0P> 
<HE> 
<PJ> 
<BD> 



1071 
1072 
1073 
1074 
1075 
1076 
1077 
1078 
.1079 
1080 
1081 
1082 
1083 
1084 
1085 
1086 
1087 
1688 
1089 
1898 
1891 
1092 
1693 
1094 
1095 
1096 
1097 
1098 
1099 
1100 
1101 
1102 
1103 
1104 
1105 
1106 
1107 
1108 
1109 
1110 
1111 
1112 
1113 
1114 
1115 
1116 
1117 
1118 
1119 
1X20 
1121 
1122 
1123 
1124 
1125 
1126 
1127 
1128 
1129 
1130 
1131 
1132 
1133 
1134 
1135 
1136 
1137 



DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



50, 2A, 
55 , AA, 
40, Dl, 
5D,58, 
75,57, 
00,55, 
05,57, 
00, D5, 
00,83, 
00,03, 
BF, 86, 
FE, CO, 
00,00, 
1D,2F, 
60, F8, 
57,14, 
50, SD, 
00, Dl, 
05, 5D, 
00,50, 
00,00, 
25,00, 

00,00, 

01,00, 
40,80, 
55,01, 

55,18, 
C5,7C, 

78, 7C, 
F8,7E, 
FC,7E, 
CO, 3C, 
7C,66, 

78, IE, 
70,66, 
C6,68, 
FE, 66, 

CG j Dg j 

78, 7C, 
C0,3C, 
8E,7C, 
C6 , 3C , 
7S,7E, 
30,66, 
78,66, 
30,66, 
CC,C6, 
C6,C6, 
60, FE, 
FE,Oö, 
C0,2A, 
54,O0, 
C0,2A, 
54,05, 
05,70, 
70,70, 
00, 06, 
00,08, 
67,61, 
65,72, 
00,00, 
OD, 00, 
04,70, 



2A.2A, 
AA , A A > 
05, D5, 
40,00, 
7F,55, 
75, FS, 
77, 5D, 
74,54, 
83,03, 
CF,EF, 
£3 , EB , 
C8,C0, 
00,00, 
01,00, 

14,50, 
57, 1D, 
51, Dl, 
5F,75, 
40,00, 
08, OD, 
94,00, 
00,28, 
80, OO, 
04,84, 
01,81, 

3C3C, 
7E,66, 
7E,66, 
7E,66, 
7E,60, 
7E,60, 
7E,66, 
66 * 66 ß 
3C,18, 
1E,8C, 
60,78, 
68, 68, 
7E,7E, 
76, 7E, 
7E,66, 
7E,68, 
7E,66, 
7E,66, 
7E,C8, 
7E,18, 
66 , 66 , 
66,66, 
66 , 66 , 
C6,66, 
Co t 6C » 
FE, 06, 
14,05, 
2B,3F, 
00,05, 
2B,3F, 
05,85, 
70,70, 
42,11, 
0O , DD, 

6D, 65, 
00,00, 
00,DO F 
70,44, 
62,00, 



3A.OC, 
AB,CC, 

00,85, 
57, SD, 
75,55, 
7D,55, 
5O,0O, 
03,03, 
FF, FF, 
FF, FF, 
CO, CO, 
OO, OO, 
OO,O0, 
51,51, 
75,75, 
05,01, 
D5,55, 
F5,54, 
00,60, 
34,06, 
00,08, 
E8,0A, 
26, A2, 
04,44, 
11,11, 

6C # 7 E j 
7C,7C, 
60, C6, 
66, C6, 
78, F8*, 
78, F8, 
66, CE, 
7E,FC, 
18,36, 
8C,18, 
78, F8, 
60, CO, 
66, CC, 
6E,CC, 
66, C6, 
7E,FC, 
C6,C6, 
7E,FC, 
FC,7E, 
18,39, 
66, CC, 
66, CC, 
86 , CC , 
1C,38, 
3C,18, 
OC,30, 
BB,BB, 
BC,BO, 
97, 9B, 
BC,B6, 
05, 05, 
70,70, 
24,41, 
OO, 00, 
0O,O0, 
O0,00, 
88,00, 
80,00, 
00,48, 
40,22, 



08,10, 
OO, OO, 
54,55, 
1D,5D, 
15, Ol, 
55,55, 
54,50, 
00,00, 
83,02, 
FF, FF, 
FF, FF, 
CO, 88, 
01,85, 
08,80, 
57,57, 
D4,50, 
00,00, 
55,05, 
50,40, 
OO, OO, 
00,00, 
25,08, 
02, OO, 
AA, A8 , 
44,44, 

XI f- XJl § 

FE,C6, 
C6,FE, 
C6,FC, 
C6,FC, 
C8,FC, 
CO, CO, 
C6,FE, 
CC.CC, 
30,78, 
D8,F8, 
CCCC, 
C8,FE, 
CC,CC, 
CCCC, 
C6,FC, 
CO, CO, 
FE,7C, 
CC.CC, 
66, FC, 
30, 38, 
CCFC, 
CC78, 
FCFC, 
6 C , C6 , 
38,30, 
CO, FE, 
BB,3C 
CO, 10, 
BB.3C 
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05, 05, 
78, 70, 
00,24, 
00,00, 
00 , OO , 
6F,76, 
08, OO, 
88,00, 
04, D4, 

4t* Jt j 4L jmL & 



292 

978 

286 

364 

618 

819 

678 

493 

20 

1469 

1881 

1534 

6 

77 

748 

746 

295 

887 

783 

144 

148 

222 

284 

541 

288 

156 

686 

915 

1250 

1284 

1222 

1488 

1352 

1234 

1216 

588 

692 

1210 

1220 

1322 

1272 

1242 

1234 

1254 

1152 

1212 

564 

1116 

1056 

1164 

1892 

882 

1116 

900 

912 

642 

912 

119 

789 

444 

O 



639 

215 



252 

540 
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<AC> 
<AD> 
<PM> 
<HB> 
<0E> 
<PK> 
<CL> 
<AJ> 
<BX> 
<A0> 
<LJ> 
<HJ> 
<KP> 
<P8> 
<E0> 
<PB> 
<HF> 
<CM> 
<FC> 
<FG> 
<0P> 
<MK> 
<LA> 
<BP> 
<H£> 
<IIF> 
<BE> 
<DJ> 
<EH> 
<PG> 
<HK> 
<AN> 
<DM> 
<BH> 
<HF> 
<AG> 
<DC> 
<EJ> 
<DK> 
<HK> 
<FA> 
<EF> 
<BH> 
<HF> 
<CK> 
<FD> 
<EK> 
<AL> 
<HK> 
<BL> 
<DM> 
<HÜ> 
<HF> 
<PH> 
<CH> 
<ED> 
<HJ> 
<BL> 
<FL> 
<LF> 
<0C> 
<MP> 
<EF> 
<G0> 
<FI> 
<GN> 
<GE> 



1136 
1139 
1140 
1141 
1142 
1143 
1144 
1145 
1146 
1147 
1148 
1149 
1150 
1151 
1152 
1153 
1154 
1155 
1156 
1157 
1156 
1159 
±166 
1161 
1162 
1163 
1164 
1165 
1166 
1167 
1168 
1169 
117» 
1171 
1172 
1173 
1174 
1175 
1176 
1177 
1178 
1179 
1180 
1181 
1182 
1183 
1184 
1185 
1186 
1187 
1188 
1189 
1198 
1191 
1192 
1193 
1194 
1195 
1196 
1197 
1198 
1199 
1280 
1281 
1282 
1203 
1284 



DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 

DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



22,22, 
22,22, 
22,22, 
00,80, 
00, 1A, 
08,84, 
13,14, 
22,23, 
0F,10, 
00, 1D, 
25,00, 
80, 0O, 
80,00, 
00,00, 
69,00, 
6E,00, 
00, oo, 
80, OO, 
69,67, 

61,67, 

00,60, 

00,88, 
63,35, 
00,80, 
08,88, 
08,00, 
74,65, 
74,65, 
7A,08, 
08,00, 
00,88, 
74,68, 
68,65, 
00,80, 
00,88, 
68,69, 
62,72. 
73,86, 
00,80, 
08,73, 
74,68, 
6S , 65 , 
08,00, 
00,74, 
6F,67, 
00,77, 
00,69, 
00,80, 
00,80, 
6D,62, 
2F,00, 
80, OO, 
80,00, 
73,73, 
74, 6F, 
00,88, 
08,88, 
2F,02, 
CCi A9, 
80,91, 
AS, CD, 
8D,3B, 
A9,AB, 
43, 24, 
CS, 02, 
84, 8D, 



41,39, 
08,80, 
1B,1C, 
05,06, 
15,00, 
26,22, 
11,16, 
00,21, 
00, OO, 
08, OO, 
28,08, 
00,08, 
76,65, 
00,88, 
00, OO, 
00,63, 
68,74, 
63, OO, 
00,00, 
00,00, 
OO, OO, 
2A,32, 
00,00, 
08,00, 
00,80, 
6E, OO, 
6E,88, 
80,80, 
00,80, 
00,69, 
65,80, 
72,33, 
00,80, 

ee,60, 

63,80, 
6F,74, 
00,00, 
00,80, 
6F,75, 
65,00, 
72,33, 
08,00, 
68,69, 
72,61, 
72,69, 
6E,00, 

00,00, 

08,73, 
65,72, 
00,80, 
00,00, 
00,08, 
80,66, 
08,73, 
88,00, 
08,00, 
8D,0O, 
40 , 85 , 
CC,Cft, 
C9,80, 
02, A9, 
BD, 42, 
A9,10, 
A9,28, 
CO, 02, 



22,22, 
24,01, 
08,88, 
80,00, 
OC,OD, 
00, 1D, 
23,07, 
17,18, 
24,25, 
80,00, 
00, O0, 
00,80, 
61,74, 
72,73, 
80,80, 
00, OO, 
6F,70, 
80,74, 
76,65, 
00,00, 
80,00, 
00,00, 
31, 2F, 
00,00, 
00, 00, 
77,72, 
63 , 61 , 
72,85, 

00,00, 

08,88, 
64,65, 
62 9 72. g 
73,00, 
00,00, 
67,72, 
74,68, 
68,65, 
08,00, 
00,00, 
6E,64, 
62,72, 
73,00, 
00,00, 
73,00, 
60,08, 
74,74, 
08,88, 
80,00, 
65,70, 
O0,2A, 
00, OO, 
00,80, 
OO, 70, 
69,72, 
74,61, 
00,00, 
00, A9, 
D4,A9, 
CD,AO, 
00, FB, 
DO, Fl, 
24, 8D, 
24, A9, 
8D,C6, 
8D,6F, 
8D,C2, 



22,22, 
22,22, 
02,03, 
00,00, 
00,80, 

" R^ f JL 4t f 

1E.1F, 
08,09, 

19,00, 

80,08, 
80, O0, 
00,08, 
61,72, 
69, 6F, 
80,08, 

00,00, 

79,72, 
72, 6F, 
72, 6C, 
00,88, 
80,00, 
00,34, 
00,08, 
88,80, 

00,00, 

69,74, 
72,73, 
69,74, 

00,00, 

00,80, 
61,00, 
6F,74, 
08,00, 
00,08, 
61, 70, 
65,00, 
72,33, 
08,80, 
00,00, 
73, 0O, 
6F,74, 
00, OO, 
00,08, 
70,72, 
69,73, 
65, 6E, 
00,00, 
08,08, 
74,85, 
32,31, 
00,00, 
00,00, 
72,65, 
65,80, 
72,74, 
08,68, 
20, 8D, 
00,3S, 
80, A9, 
E6,CD, 
A9,39, 
31,02, 
40, 8D, 
02, 8D, 
02,A9, 
02, A9, 



272 

232 

8 

81 

72 

150 

208 

142 

218 

37 



40 

424 

769 

110 

O 

557 

769 

75S 

208 

O 

52 

340 

O 

O 

454 

752 

763 

122 



483 

760 

485 



426 

629 

889 

115 

8 

668 

760 

485 



666 

754 

781 

215 



545 

563 

47 

8 

327 

652 

785 

8 

342 

704 

1104 

1443 

1374 

588 

948 

770 

826 

845 



<KD> 1285 DATA F2 , 8D , Cl , 02 , 8D , C3, 82 , A2, 1878 
<IA> 1206 DATA OO , BD, SC , 24 , 9D , 0A , 40, BD , 737 
<FD> 1207 DATA 78, 24, 9D ,32, 46, BD, 84,24,776 
<IF> 1288 DATA 9D , 5A, 48, BD, 98 , 24, 9D , 82, 975 
<KA> 1209 DATA 40, E8, EO , 14 , DO , E3 , A9, 18, 1108 
<GH> 1210 DATA SD , 87 , D4, A2 , 88 , A9 , 88, 9D , 848 
<KC> 1211 DATA O8,D0,E8,E0,04,D0,F8,A9,1381 
<EP> 1212 DATA 03 , 8D , 1D , DO , A2 , 08 , A9 , 00 , 712 
<GA> 1213 DATA 9D , 08, IC, 9D, 80 , 1D, 9D, 80,528 
<Jft> 1214 DATA 1£,9D,00,1F,E8,DO,F1,4C,975 
<HB> .1215 DATA Fl, 26,0*», 86,EC,6A,2A, 1A,823 
<KJ> 1216 DATA 26, 71,E8,E8,E8,7F,3F,1F, 1044 
<F0> 1217 DATA 66 , 01 , 08, 86, EC , 6E , 2fl , 1A, 549 
<JH> 1218 DATA 26, 71 , E0,EO, EO ,79, 3D, 1F , 1836 
<BH> 1219 DATA 06,01,00,61,37,56,54,58,417 
<LG> 1220 DATA 64, 8E ,07, 07, 07, FE, FC , F8 , 1017 
<BI> 1221 DATA 60,80,00,01,37,76,54,58,570 
<IC> 1222 DATA 64 , 8E , 07, 07 , 07 , 9E , BC , F8 , 857 
<GM> 1223 DATA 60,80, A2, 08, BD, Dl, 26, 9D, 979 
<TF> 1224 DATA 14, IC , BD , D9, 26 , 9D , 14 , 1D, 698 
<HA> 1225 DATA ES , E8, 88 , D8 , EF , A9 , 20, BD , 1253 
<GO> 1226 DATA F4, 02, A9, 3F, 8D, 22, 02, A9, 824 
<GO> 12Z7 DATA 5E , 8D -, 24 , 82 , A9, 27, 8D, 25 , 6S9 
<HJ> 1228 DATA 82, 8D, 23, 02, A9, 3E, 8D, 2F, 599 
<FD> 1229 DATA 82, A9, 80, 85, 14 , AD, OB, D4, 728 
(Gl» 1238 DATA 0A , OA , 8D , 17 , D0 , 4A, 65, 14 , 587 
<GC> 1231 DATA 29, 8F , 69, 20 , 8D, 16, D8, A5, 729 
<MK> 1232 DATA 14 , C9 , FF, DO , ES , 4C, 9F, 27, 1198 
<IC> 1233 DATA A9, 83, 8D,8F, D2, A9,00,8D,848 
<I_A> 1234 DATA 88, D2 , AS , CE , FB , 0E, A9, 14, 1032 
<LI> 1235 DATA 8D , 00, D2 , AS, CE , 69, 80 , 8D, 1896 
<MB> 1236 DATA 01,D2, C6, CE, 4C, 5F, E4, AS, 1179 
<FJ> 1237 DATA 14 , 8D , 08 , DO, 8D , 81 , DO , 85, 852 
<LH> 1238 DATA DO , C9 , 66 , DO , OD , A9 , OF, 85, 1049 
<KF> 1239 DATA CE , A2 , OA, 8E , OD, 40 , E8, 8E , 971 
<K0> 1240 DATA 0E , 40 , A5, DO , C9 , 9B, DO, OD, 1028 
<JN> 1241 DATA A9, OF , 85, CE, A2 , OA, 8E, 1B, 864 
<HA> 1242 DATA 40 , E8 , 8E , IC , 40 , A5, 14 , C9, 916 
<GP> 1243 DATA E6, DO, OA, A9, 62, 8D, 24,02, 894 
<HO> 1244 DATA A9, E4, 8D , 25 , 02 , 4C, 62 , E4 , 979 
<H0> 1245 DATA A2, OO , BD , Bl , 26 , 9D , 14 , IE , 773 
<MJ> 1246 DATA BD , B9, 26 , 9D , 14 , 1F, E8 , E0 , 1076 
<f_8> 1247 DATA 88, DO, EF, A9, 4C, 8D, 80, D8, 1049 
<KH> 1248 DATA 8D, 81 , D8, A9, AA, SD, 62, D6, 1848 
<HL> 1249 DATA 8D , 83 , DO, A2, 88, BD, AC, 24 , 911 
<LP> 1258 DATA 9D, 3F,44, BD, DO, 24, 9D, 8F,1821 
<MD> 1251 DATA 44, BD , F4 , 24 , 9D , DF, 44 , BD, 1174 
<GH> 1252 DATA 18, 25, 9D,2F,45, BD,3C, 25,620 
<IG> 1253 DATA 9D, A7, 45, BD, 60, 25, 9D, 1F, 903 
<IM> 1254 DATA 46, BD, 84, 25, 90,97,46, BD, 995 
<JP> 1255 DATA A8„ 25, 9D, 8F, 47, BD, CC, 25 , 878 
<H0> 1256 DATA 9D , 87, 47 , BD , F0 , 25, 9D, FF , 1241 
<MH> 1257 DATA 47, E8, E8, 24, DO , BF, A9, 2D, 1176 
<FK> 1258 DATA 8D, 24 , 82, A9, 28, 8D, 25 , 02, 568 
<JE> 1259 DATA A9 , 00 , 8S, CG , AD , OB, D4 , OA , 912 
<FL> 1260 DATA 4A,8D,17, DO, 0A, 65, 14,29, 618 
<HE> 1261 DATA OF, 69, 30, 8D, 16 , D6, AD , 84, 844 
<ME> 1262 DATA 02, DO, E9, 4C, 8D, 29, E6, CD, 1136 
<HP> 1263 DATA AS, CD, C9, 04, FO, 83, 4C, 62, 992 
<HA> 1264 DATA E4, A9, 88 , 85, CD , E6 , CC , A5 , 1334 
<HT> 1265 DATA CC, C9, 88, D8, 12, 18, AD, 42, 982 
<DJ> 1266 DATA -24,69,28,80,42,24,90,03,571 
<JD> 1267 DATA EE , 43, 24, A9 , 08, 85, CC, SD , 98« 
<KH> 1268 DATA 05, D4, AD, 42, 24, C9 ,E8, D8, 1125 
<GM> 1269 DATA 11, AD , 43, 24, C9 , 46 , DO, OA, 782 
<H0> 1278 DATA A9, 62 , 8D, 24, 82 , A9 , E4, 8D , 984 
<CO> 1271 DATA 25,02, 4C , 62, E4, 70 , 44, 80, 621 
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<AO 
<EF> 
<DC> 
<ED> 
<F0> 

<fb> 

<CH> 
<DA> 
<BL> 
<EK> 
<CB> 
<CO> 
<EJ> 
<F8> 
<HL> 
<BH> 
<FI> 
<PK> 
<HG> 
<DB> 
<HI> 
<HJ> 
<HK> 
<HL> 
<AL> 
<CP> 
<DP> 
<EH> 
<PL> 
<IB> 
<K8> 
<FL> 
<FP> 
<LN> 
<GG> 
<EI> 
<GC> 
<HL> 
<FP> 
<FM> 
<FL> 
<GH> 
<GM> 
<K0> 
<MA> 
<FK> 
<BI> 
<LI> 
<FM> 
<J*i> 
<JL> 
<IM> 
<FN> 
<FD> 
<HF> 
<GE> 
<HL> 
<0E> 
<OG> 
<<GE> 
<LC> 
<AL> 
<PK> 
<GD> 
<EC> 
<FL> 
<GM> 



1272 
1273 
±274 
1275 
1276 
1277 
127B 
1279 
1260 
1281 
1282 
1283 
1284 
1285 
1286 
1287 
1283 
±283 
1298 
1291 
1292 
1293 
1294 
±295 
1298 
±297 
1298 
±299 
1388 
1381 
1382 
1383 
1384 
1305 
1386 
±387 
1383 
1389 
1318 
1311 
1312 
1313 
13±4 
1315 
1316 
1317 
1318 
±319 
±328 
±32± 
1322 
±323 
1324 
1325 
1326 
1327 
1328 
1329 
1330 
1331 
±332 
1333 
133* 
1335 
±336 
±337 
±338 



DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



41,44,33, 
4C,43,C4, 
54,18,46, 
43,54,18, 
18,48,54, 
54,18,4E, 
53,54,18, 
18,53,D4, 
55,78,82, 
69,6D,65, 
88,88,88, 
6C,88,2A, 

&1| PH| DIj 

7B,7C,88, 
88,88,88, 
88,88,74, 
6D, 65,88, 
65,72,88, 
88,88,83, 
88,88,6E, 
88,88,88, 
88,33,83, 
83,83,88, 
38,83,88, 
38,83,33, 
73,38,66, 
©F, 68, 73, 
74,68, 65, 
83,80,80, 
72,3D,0A, 
1A,0O,A9, 
7A,3D,00, 
D4, 68,48, 
D4,8D, 1A, 
5D,8D,83, 
8D,22,02, 
A9,E4,8D, 
A9,SD,3D, 
3±,32, A9, 
2F,82,A9, 
28,8D,3±, 
82,A9,8E, 
8D,C5,D2, 
A9,F8,8D, 
14,F8,FC, 
41, 85, CD, 
C€,C8,D8, 
C9>55,DO, 
48,9D,84, 
FS, A2,83, 
55,EÖ,EO, 
BD, OD, 29, 
28, DO, FS, 
9D,03,38, 
39, BD, 83, 
88,23, 9D, 
4C,B3,2A, 
D7,»7,D7, 
BF,BE,7E, 
FE, FE, BD, 
2A,2A, AA, 
AA, AA, AA, 
AA, AA, AA, 
AA, AA, AA, 
A3, A8, AA, 
FB,FB,FB, 
FB,FF,BE, 



48,44,24, 
74,48,54, 
54, ±8,47, 
49, 54, ±3, 
±8,4C,54, 
54,±8,4F, 
5±,54,±Ö, 
±8,54,78, 
41,74,23, 
88,29,29, 
68, 6C, 65, 
83,00,03, 
73,38,76, 
7B,7C,88, 
83,88,88, 
68, 65, 88, 
69,73,68, 
36,88,88, 
88,88,30, 
65,63,74, 
88,88,83, 
88,88,88, 
©8, 63, 38, 
88,38,88, 
88,78,72, 
69,72,65, 
74,61,72, 
88,67,61, 
68, 88, 88, 
D4,8D,33, 
B4,8D, ±6, 
82, A9,38, 
48, A9,08, 
D0,8D,±8, 
82,68,46, 
A9,62,8D, 
23,82,3D, 
88,82, A9, 
3C,8D,81, 
74,8D,38, 
82, A9,88, 
8D,C4,82, 
A9,34,8D, 
C7,82, AS, 
A9,2E,85, 
A3, 38, A9, 
FB,E6,CD, 
EF, A2,23, 
43,CA,E8, 
BD, BD, 28, 
23,D8,F5, 
9D,34,55, 
A2,00,BD, 
BD, 38, 21, 
22,9», 83, 
88,3B,E8, 
D7,D7,D7, 
82, 8A, 9A, 
48,92,96, 
38,83,82, 
8A, AA, AA, 
AA, AA, AA, 
AO, AA, AA, 
88,88,88, 
FB,FB,FB, 
BE,FF,FB, 
FB,FF,FF, 



48,44, 
18,45, 
54,18, 
4A,S4, 
18, 4D, 
54,13, 
52,54, 
42,88, 
38,74, 
29,29, 
76,65, 
88, 6D, 
7C88, 
88,83, 
88,88, 
67,61, 
6F,76, 
33,88, 
88,38, 
61.72, 
83,33, 
88,88, 
88,83, 
38,88, 
65,73, 
38,74, 
74,88, 
6D,65, 
43, A9, 
D±,8D, 
D3, A9, 
3D,89, 
8D,8A, 
D3,A9, 
A9,5F, 
24,32, 
25,32, 
29, 6D, 
D2,8D, 
82, A9, 
BD, C8, 
A9,8A, 
C6,82, 
14, CS, 
CC, A9, 
88,91, 
AS, CD, 
BD, 88, 
84, D3, 
9D,34, 
A2,88, 
E8,E8, 
83,28, 
9D,88, 
3A,BD, 
D8,E5, 
D7,D7, 
BE,BF, 
BE,BE, 
82,85, 
AA,55, 
AA,55, 
AA,55, 
38,58, 
FF, FF, 
FB,FB, 
FB,FB, 



433 

693 

465 

5±9 

468 

481 

543 

685 

536 

479 

428 

259 

662 

494 

6 

521 

659 

215 

8 

637 

8 

3 

8 

8 

442 

653 

669 

731 

241 

963 

±123 

643 

772 

1129 

668 

623 

7S5 

756 

725 

694 

742 

733 

982 

1141 

1233 

877 

1668 

1124 

927 

986 

1196 

993 

876 

592 

684 

923 

1372 

1328 

1247 

786 

3S9 

±275 

±265 

846 

±769 

±95± 

±959 



<GJ> 
<CA> 
<LC> 
<MF> 
<DP> 
<IF> 
<JE> 
<1E> 
<EG> 
<HO> 
<GO> 
<6I> 
<MJ> 
<JG> 
<PH> 
<IL> 
<GJ> 
<MB> 
<IJ> 
<JJ> 
<JH> 
<JG> 
<GF> 
<HB> 
<0B> 
<EM> 
<PH> 
<KD> 
<OJ> 
<HI> 
<MJ> 
<OC> 
<MP> 
<MA> 
<IF> 
<H0> 
<MC> 
<0J> 

<LJ> 
<LE> 
<KD> 
<FP> 
<L0> 
<MF> 
<M0> 
<0D> 
<FP> 
<IK> 
<IK> 
<JB> 
<HJ> 
<GB> 
<GF> 
<GF> 
<GL> 
<LF> 
<OB> 
<LS> 
<LM> 
<G0> 
<IH> 
<GD> 
<0G> 
<NM> 
<IJ> 
<PF> 



±339 
1343 
1341 
1342 
1343 
1344 
1345 
1346 
1347 
1348 
1349 
1353 
1351 
±352 
1353 
1354 
1355 
±356 
±357 
±358 
1359 
1368 
1361 
±362 
1363 
1364 
1365 
1366 
1367 
1368 
1369 
±370 
1371 
±372 
±373 
1374 
1375 
1376 
1377 
1373 
1379 
1386 
1381 
1382 
1333 
1384 
1335 
1336 
1387 
1388 
1389 
1398 
1391 
1392 
1393 
1394 
1395 
1396 
1397 
1398 
1399 
1488 
1481 
1432 
±433 
1484 
1485 



DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



FB,FB, 
FA,FF, 
2A,2A, 
A8,AS, 
68,88, 
D4, A2, 
38 , E8 , 
A9,68, 
29,81, 
E8,D8, 
47,85, 
CCj Co j 
A5,CD, 
A3, 31, 
E6,CD, 
A9,3F, 
A2,84, 
47, E8, 
17,47, 
13, 4B, 
15, 4D, 
17, 4F, 
88, 8D, 
88, BD, 
IC , 35 , 
8A,D2, 
CD, A5, 
CF,A2, 
CE,E6, 
E8,CF, 
öl,A9, 
CF,C9, 
CE,D8, 
CB , C 9 , 
CB, AD, 
85,65, 
A6,A9, 
CD, A9, 
C9,4E, 
82, 8E, 
A9,88, 
85, Fl, 
85, F6, 
1C,9D, 
FF,8D, 
A9,64, 
A9,C8, 
47, 8D, 
8D,81, 
8D,82, 
63,06, 
84,86, 
35,86, 
86, A9, 
8D,23, 
A9,2C, 
F2,A9, 
2E, AS, 
65, F8, 
08, D2, 
28,76, 
83, FE», 
33, DO, 
CA,E3, 
18 j fe j j 
FE,C9, 
AS, FD, 



FB,BF, 
FF,AA, 
8A, AA, 
A8,88, 
88,83, 
88, BD, 
E8,88, 
9D,38, 
18,69, 
ED, A9, 
CD, A3, 
CO, 83, 

91, CC, 
AS, CD, 
8D,18, 
8E,18, 
E3,8E, 
E3,8E, 

CÜ.8 ß OeT j 

E8,8E, 
A9, AA, 
82, D8, 
68, Dö, 
CC,A9, 
29,87, 
CC , 85 , 
83, A3, 
CB,C3, 
E8,E8, 
7F,91, 
54, DO, 
64, A9, 
5A,D3, 
8A,D2, 
CC , 85 , 
4E,65, 
El, 85, 
F8,83, 
E2,49, 
85, F7, 
85, F3, 
A2,80, 
88, 1D, 
C4,82, 
85, FA, 
85, FC, 
83,86, 
68, A6, 
86, E3, 
A6,FC, 
A6,FB, 
E8,BD, 
58, 8D, 
32, A9, 
819,25, 
3F,8D, 
F4,C9, 
80,01, 
C6,F4, 
2C , 58, 
8A,55, 
8A, A9, 
FF,D8, 
D7,85, 
85, F8, 
85 , FE, 



FF,FA, 
AA, AA , 
AA,AA, 
88, FF, 
A9,C8, 
3A,2A, 
D3,F5, 
54, AD, 
5E,9D, 
18,85, 
88, A9, 
D8,F9, 
D8,ED, 
A3,06, 
C9,54, 
4A,8D, 
47, E8, 
16,47, 
12, 4A, 
14, 4C, 
18, 4F, 
8D,79, 
8D,03, 
SD, 81, 
B6, 85, 
18,69, 
CE,A5, 
60, A5, 
C8,04, 
33, D8, 

Kr tZ- jf KZ. O g 

F4, AS, 
4E,85, 
84, A9, 
29,83, 
CC69, 
CB,A9, 
CC,AD, 
4C,68, 
ES , 3E , 
85 , CE , 
35, F4, 
A9,68, 
ES, DO, 
A9,32, 
A9,96, 
A6,F9, 
E8,BD, 
FA,BD, 
BD, 03, 
BD, 08, 
BD, 30, 
00,58, 
22,02, 
6E,8D, 
02,A9, 
2F,02, 
FF,FO, 
D2,A5, 
4C,SF, 
4C,62, 
BD,8A, 
29,9», 
EC,AD, 
FD,E6, 
83, 4C, 
A5,F9, 



FE, FE, 
AA, 55, 
AA,55, 
FF,C8, 
8D,3E, 
9D,8S, 
A2,08, 
OA,D2, 
88,53, 
CC,A9, 
86,91, 
E6,CD, 
A9,61, 
91, CC, 
DB,EE, 
19, 4A, 
8E,11, 
E8, 8E, 
E3,8E, 
ES , 8E, 

&S , Sc , 
38, A9, 
D8, A9, 
»8, A9, 
CB, AD, 
49,85, 
CD, 35, 
CB,91, 
B8,FS, 
EC,A8, 
CF,A5, 
CB,C9> 
CB,A5, 
B6,S5, 
13 , 69 , 
2D,96, 
49,85, 
El, 49, 
2B,A2, 
E3,49, 
85, FB, 
A9,89, 
9D,60, 
F7,A9, 
85, F9, 
85, FB, 
BD, 00, 
83,47, 
80, 4 A, 
4A,8D, 
4D,SD, 
58, 8D, 
8D,86, 
A9,2C, 
£4,32, 
32,35, 
4C,FE, 
OD, 18, 
F3,8D, 
E4,78, 
E4, A2, 
55, C9, 
8A,55, 
13, 55 , 
FE, AS, 

4C , jCmP , 
85 , CC , 



1957 

152S 

859 

1198 

516 

828 

1255 

899 

585 

1368 

889 

1496 

1266 

1825 

1536 

863 

786 

1144 

934 

933 

941 

928 

872 

996 

1225 

683 

1416 

1842 

1483 

±583 

±258 

15±3 

±±66 

1198 

769 

941 

1124 

1487 

899 

1±±7 

±261 

1385 

667 

1878 

1195 

1355 

1358 

718 

827 

785 

834 

837 

659 

653 

636 

745 

994 

1183 

1258 

1171 

846 

837 

731 

1487 

1379 

932 

1556 
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<GI> i486 DATA A9, 47,85, CD, AO, 00, B9, «8,923 
<KC> 1487 DATA 06, 91 , CC , CS, Co, 02, 0O,F6,12O3 
<HF> 1408 DATA C6, F9, C6, CC, AO , OB, Bl , CC, 1398 
<II> 1489 DATA 99, 88 , 86 , C8 , C8 , 82, 00, F6, 1887 
<LG> 1418 DATA AB, 88, A9, SC, 91, CC, C8,A9, 1139 
<ÖB> 1411 DATA 50,91,CC,A5,FA,85,CC,A9,1363 
<GB> 1412 DATA 4A, 85 , CD, A8 , 88 , B9 , 82 , 86 , 765 
<L0> 1413 DATA 91, CC, C8 , C8, 02, 08, F6, C6, 1395 
<ME> 1414 DATA FA, CS, CC, A8, 98, B1,CC, 99, 1346 
<IS> 1415 DATA 92 F ÜS J C8,C0,e2,DB»F6,OÖ f l»16 
<MA> 1416 DATA 86, A9, SC, 91, CC, C8, A9, 50, 1672 
<0K> 1417 DATA 9i,CC,A5,FB,85,CC, A9,4D,1348 
<GB> 1418 DATA 85 , CD , A8, 88 , 89 , 85 , «6, 91 , 839 
<Hlt> 1419 DATA CC , C8 , CO , 02 , DO , F6 , C6 , FB , 1581 
<(CF> 1428 DATA Cß, CC, A8, 88, Bl, CC, 99, 85, 1181 
<HP> 1421 RATA 86 , CS , CO, 82 , DO, F6, «8, 88, 1814 
<MA> 1422 DATA A9, SA, 91, CC, C8, A9, SB, 91; 1213 
<MA> 1423 DATA CC, AS , FC , 85 , CC , A9, 58 , 85 , 1340 
<HE> 1424 DATA CD, AO, 80, B9, 04, 06, 91, CC, 989 
<ÜB> 1425 DATA C6, FC, C6, CC, AO , 80, Bl, CC, 1393 
<IE> 1426 DATA 99, 84, 86, A9 , SA , 91 , CC, C6, 969 
<MF> 1427 DATA FF, AS, FF, 08, 28, A9, 08, 85,1225 
<LI> 1428 DATA FF, A2, 88, BD, 23, 55, C9, 7B, 1058 
<KB> 1429 DATA F8 , 07, A9, 7B, 9D, 23, 55, D8, 1024 
<KH> 1438 DATA 85, A9 , 7D , 9D, 23, SS , E8, E8 , 104Ö 
<MC> 1431 DATA ES , E4 , F6 , DO, E6 , A2 , OO, A9 , 1475 
<LA> 1432 DATA A8 , 9D , 3F , 55, E8, E8, 19 , D8 , 1154 
<LH> 1433 DATA F8 , A6 , F7 , A9, 81 , 9», 3F , 55, 1136 
<LP> 1434 DATA AS, EF , F8 , 61, 68, C6 , F5 , AS, 1349 
<LB> 1435 DATA FS, D8, 42, A9, 84, BS, FS, AD, 1243 
<HD> 1436 DATA 78 , 02 , C9, 88 , D8 , 18 ( AS , Fl, 972 
<HE> 1437 DATA C9, 0O, FO, 12 , A9 , 08 , 85 , EB, 996 
<LB> 1438 DATA E6,F0, A5, FO , C9, 04 , DO, 06, 1294 
<LK> 1439 DATA A9 , 83, 85, FO, C6, Fl , AD, 78, 1274 
<JM> 1440 DATA 82 , C9, 87 , D0 , 18 , AS; Fl , C9 , 1849 
<LH> 1441 DATA CF, FO , 12, A9, 28, 85, EB , C6, 1232 
<KE> 14*2 DATA FO , ÖS , FO, CS» FF, D8 , 06 , A9 , 1484 
<JE> 1443 DATA 83, 85, F8, E6, Fl, A2, 80, A5, 1174 
<MM> 1444 DATA Fl , 90 f 8S , 28, E8, E8, E8, EO, 1491 
<KM> 1445 DATA 30 , DO, F6 ,A5, FO, 80, 04, 04,1264 
<LA> 1446 DATA AS, FS f C9 , 81 f DO , 82 , E6 , F2, 1294 
<Gtt> 1M7 DATA AD, 84 , 02 , FO , ©4 , A9 , Ol , 85 , 854 
<MP> 1448 DATA ED , AD, 84 , «2, DO, 26 , AS, ED, 1192 
<KJ> 1449 DATA FO , 22 , A9 , OO , 85 , ED , AS, F2, 1220 
<MB> 14SO DATA 69, FB , 85, F2 , A9 , BD , 85, F4, 1290 
<J0> 1451 DATA A9,02,85,F3,A9,8O,85,F8,i225 
<HK> 1452 DATA E6, EC, A5, EC, C9, 02, DO, 84, 1282 
<GK> 1453 DATA A9 , OO, 85 , EC, A2 , 00 , A9„ OO, 869 
<HG> 1454 DATA 9D , OO, IC, 9D, OO, 1» , E8, DO s ©11 
<LF> 1455 DATA F7, AS, F2, 18, 69, BF, BO, ©4 , 1154 
<KC> 1456 DATA A9 , 42 , 85 , F2 , A5 , EC , 29, Ol , 1053 
<H»> 1457 DATA OA , 6A , 8A , OA , 18 , 65 , EB, 69 , 505 
<MG> 1458 DATA Bl, 85, CC, A9, 26, 85, CD, AO, 1219 
<IK> 1459 DATA OO, A6, F2, Bl, CC, 9D, OO, IC, 974 
<MI1> 1460 DATA C8, E8 , CO , 08 , DO , F5 , A6 , F2, 1493 
<MI> 1461 DATA Bl , CC, 9D, OO, 1D, C8,E8, CO, 1191 
<JB> 1482 »ATA iö, DO, FS , A3 , OO , 85 , 40 , A5 , 1813 
<LB> 1463 DATA F5,C9,O1,0O,42,A5,F1,C9,1328 
<MI> 1464 DATA CB, 08; 1A, A5, F2, C9, 4C, 00, 1329 
<L.E> 1465 DATA 14, AS, F7, C9, ±8, FO, 8E, E6,1141 
<MH> 1466 DATA F7, A9, 3C , 85, F3, A9, OF , 85, 1169 
<MC> 1467 DATA F4 , A9, AO, 85 , F8 „ AS, Fl, C9, 1561 
<KJ> 1468 DATA Ol, DO, IC, AS, F2, C9, 54, DO, 1137 
<KG> 1469 DATA 16, AS, F7,C9, OO, FO, 10, C6, 1089 
<MN> 1470 DATA F7, E6, EE, A9 , 64 , 85, F3, A9, 1529 
<MA> 1471 DATA OF , 85, F4, A9, AO , 85, FS , AS, 1267 
<LD> 1472 DATA F7,C9, 18, DO, 12, AS, Fl, C9, 1305 



cr.K> 


1473 


DATA 


<LC> 


1474 


DATA 


<LK> 


1475 


DATA 


<HM> 


1476 


DATA 


<LC> 


1477 


DATA 


<KF> 


1478 


DATA 


<LA> 


1479 


DATA 


<FF> 


1488 


DATA 


<LA> 


1481 


DATA 


<MI> 


1482 


DATA 


(HC) 


1483 


DATA 


<KI> 


1484 


DATA 


<GB> 


1485 


DATA 


<KD> 


i486 


DATA 


<HH> 


1487 


DATA 


<KJ> 


1488 


DATA 


<XI> 


1489 


DATA 


<JM> 


1490 


DATA 


<JH> 


1491 


DATA 


<MB> 


1492 


DATA 


<KC> 


1493 


DATA 


<L1> 


1494 


DATA 


<MP> 


1495 


DATA 


<GI> 


1496 


DATA 


<MD> 


1497 


DATA 


<KJ> 


1498 


DATA 


<LA> 


1499 


DATA 


<LC> 


1500 


DATA 


<LK> 


1581 


DATA 


<GH> 


1502 


DATA 


<DG> 


1503 


DATA 


<GH> 


1584 


DATA 


<HF> 


1585 


DATA 


<LA> 


1506 


DATA 


OG> 


1587 


DATA 


<FP> 


1508 


DATA 


<KG> 


1589 


DATA 


<HB> 


1510 


DATA 


<KG> 


1511 


DATA 


<HL> 


1512 


DATA 


<FB> 


1513 


DATA 


<MB> 


1514 


DATA 


<GG> 


1515 


DATA 


<AB> 


1516 


DATA 


<DM> 


1517 


DATA 


<EM> 


1518 


DATA 


<EO> 


1519 


DATA 


<CG> 


1520 


DATA 


<HK> 


1521 


DATA 


<GD> 


1522 


DATA 


<FH> 


1523 


DATA 


<KB> 


1524 


DATA 


<GF> 


1525 


DATA 


<HA> 


1526 


DATA 


<NM> 


1527 


DATA 


<GD> 


1528 


DATA 


<ME> 


1529 


DATA 


<FP> 


1530 


DATA 


<FG> 


1531 


DATA 


<GE> 


1532 


DATA 


<LI> 


1533 


DATA 



CB,D8,8C,A2, 08, A9, 29, 90,952 

OA,55,E8,E0,O4,D8,F8,A5,1176 

EE,C9, 18, DO, 13, EE, 18,55, 1837 

A2,80,A9,29,9D,8A,55,E8,856 

E8,04,D0,F8,A9,88,85,EE,1224 

A5,F6,D0,87,A9,29,8D,23,1812 

55,D0,BB,A6,F6,A9, 08, 90,1842 

23, 55,E8, 90, 23,55,68,76,845 

A9,20,85,E8,A9,00,85,EC,1187 

85,EE,85,EF,A9,01,85,F5,1291 

58,A9,02,8D,1E,D0,A9,08,887 

85,14,A5,14,C9,OA,D0,FA,1O07 

AD, OS, DO, C9,00,FB, 03,20,862 

4C,2F,A9,81,8D,lE,DO,AD,845 

OA,55,C9,2E,D0,O3,28,BA,771 

2F,A5,F6,DO,03,4C,CA,2F,994 

AD,18,55,C9,2E,D8,83,4C,816 

3F,38,4C,1F,2F,85,CF,A9,774 

01,85,EF,A5,14,C5,14,F8,1O15 

FC,A9,32,85,F3,A9,8F,85,1164 

F4,A9,88,8S,F8,A9,80,85,1224 

14,A5,14,C9,8F,D8,FA,A5,1844 

14, CS, 14, F8, FC, A2, FF, BD, 1335 

OB, IC, 9D, Ol, IC, BD, OB, 10,432 

9D,01,l&,CA,EO,ei,D0,EF,ieSl 

AD,AF,1C,F0,E2, A9 , 64 , 85, 1244 

F3, A9,OF, 85, F4,A9, 00,85,1106 
14,A5,14,C9,1E,DO,FA,C6,1092 
F6,C6,F6,C6,F6,A9, 41, 85,1581 
F2,A9,O0,85,EF,A9, 00,20,984 
71,30,85,14,A5,14,C5,14,716 
D8,FC,60,20>,4C,2F,A2,06,B73 
A9, 29, 90, 0A, 55, ES, CO, 64, 922 
DO,FS,6e,A9,09,8D,lD,DO,lO99 
A9,5F,80,22,O2,A9,E4,8D,979 
23 , 02 , A9 , Öl , 85 , EF , A9 , OO , 748 
S5,14,A5,14,C9,OA,D0,FA,1B07 
A2,00, BD, £6, 28,90,05,55,868 
BD, 36, 29,90,35, 55, E8,E8, 1835 
28,D0,EF,A2,OO,A9,OO,9D,975 
60, 55, 90, 2C, 53, 90, 30,55,681 
90,5B,55,E8, £0,05, 08, EF, 1241 
AD, 84, 02,08, 03, 4C, 14,28,860 
00,80; 00,88, 08, 74, 68, 6S, 321 
00,62,65,65,68,69,76,65,728 
OO, 69, 73, OO, 66, 75, 6C, 6C, 655 
08,6F, 66,88, 6E, 65,63, 74,639 
61,72,00,00,00,00,00,00,211 
A9 , 62 , 80 , 24 , 02 , A9 , £4 , 80, 984 
25,82, AS, 14, CS, 14, FO, FC, 933 
A2 , OO , BD , ±7 , 30 , 90 , 35 , 55 , 717 
E8,E8, 28, DO, FS, A9, 00,85,1251 
14, AD, OB, D4, 65, 14,80, 16,780 
DO,A5,14,C9,FF,0O,F2,6C,14O7 
FC,FF,8D,1£,D8,A2,©0,A9,1217 
OO,9D,eO,lC,9D,eO,10,E8,6O3 
DO, F7, A5 , 14 , CS , 14 , FO, FC , 1349 
A9,00, 8D, IE, DO, 60, A9, 80,813 
80,44,02, A9, 81,85, D9,A9, 692 
14 , 85 , OC , A9 , 26 , 85 , 00 , 6C , 626 
FC , FF , EO ,02 , El , 82 , 80 , 30, 1149 



* Ende des Listings * 
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Verdietiei! Sie Geld mit l^rem Göiiipüter! 



Bewerbung als Programmautor 



Name: 



Streiße: 



Vorname : 



Alter: 



Wohnort: 



Titel des Programm es: 



Computersystem : 



Erforderlicher Speicherplatz : 
Erforderliche Peripherie: 



kBytes 



Ich versichere hiermit, daß ich der Autor des oben genannten Programmes bin und alle Rechte besitze. Ich bin 
damit einverstanden, daß Sie mein Programm in einer Ihrer Zeitschriften abdrucken und/oder dieses ander- 
weitig kommerziell verwenden. Das einmalige Honorar beträgt im Falle einer Veröffentlichung 120, - DM pro 
komplett abgedruckter Seite. Sollte das Programm nicht veröffentlicht werden, so bitte ich um Rücksendung 
meiner Unterlagen. 



Folgende Unterlagen liegen diesem Schreiben bei : 
Kassette: Diskette: Dokumentation: 

Unterschrift des Programmautors: 



Listing: 



Rückporto: 



Anschrift: Tronic-Verlag, Am Stad 35 - 3440 Eschwege 



Er kernt; sah und siegte ij mh \ Ktmzentration, Reakli&n und &szinMi&n! 



Bei dem Spiel „Quadrato" wird Ihr Gedäch- 
nis geschult! Finden Sie in einem großen 
Feld bestimmte Anordnungen von Quadra- 
ten. 

Obenrecht&erscheint ein 3x3 Felder großes 
Quadrat, in dem eine Anordnung vorgege- 
ben wird. Dieses Muster müssen Sie auf 
dem großen Feld wiederfinden. Auf der Su- 



che nach der Anordnung können Sie einen 
ebenfalls 3x3 Felder großen Cursor mit 
Joystick Port 1 über den Bildschirm bewe- 
gen. Haben Sie endlich das richtige Muster 
gefunden, müssen Sie auf den Feuerknopf 
drücken. Das würde alles keine Schwierig- 
keiten bereiten, wenn nicht dieser erbärm- 
liche Zeitdruck wäre. Mit jedem Level 



nimmt auch die Zeit ab, in der Sie das Mu- 
ster gefunden haben müssen. Sie brauchen 
wirklich ein gutes Auge und blitzschnelle 
Reaktionen, sonst verlieren Sie im Nu Ihre 
drei Leben. Die Punkte richten sich nach 
der Restzeit, die Sie nicht für die Suche be- 
nötigt haben. Obwohl das Spiel im Prinzip 
ganz einfach gemacht ist, hat es aufgrund 
seiner ansprechende Grafik in der Redak- 
tion eine riesige Begeisterung hervorgeru- 
fen. Sämtliche Strategen plazierten sich um 
den kleinen Atari und waren von dem Pro- 
gramm gefesselt. 

Quadrato ist in Basic geschrieben und auf 
Kassette und Diskette iauffähig. 
Lassen Sie also Ihre Blicke schleifen! 



<IP> 


iooa 




1 
<AL> 








1066 


REM | 460O DORTMUND 1 


<pp> 


ioio 


REM | QUADRATO 


| 






! 






<AP> 


1076 


REM | CC3 1905 


<xa> 


1020 




1 

<JO> 








1080 




1030 


REH ! PR0DUCED BY 


* 


I 






<AÖ> 


1030 


GRAPHXC5 20;G05UB 3400 


<FM> 


1040 


REM 1 STEPHAN LXPPHARDT 


<MD> 


11ÖO 


R=P£EKtl063-O 


1 






<HD> 


1110 


P0KE 756,R:POKE 623,1 


<HA> 


lese 


REM ! HALFMANN5TR . 20 


<Gt!> 


1126 


DXM TS £1003 , ES £4303, D$ €253 , «5 C 



60 



^ 



•> 


»6j 


"OGGBGO" 


? 


»6J 


"BONUS:" 


-> 


tte; 


"flooe" 


•> 


»6j 


"LIOES:" 


*r 


»6J 


•«eo" 


? 


«6j 


"LEVEL:" 


? 


M6j 


!"0©" 


f 


H6j 


,"FIELDi" 


-? 


»6j 


;"Oe» 



355 ,5C (67 

<EJ> 1130 N5ti,lJ~"-":N$t35 J 35J='—'":NSC2 

<ÖX> 1140 FÜR 2=0 TO 6 : SC *ZJ = : NEXT Z 

<8C> 1150 GOSUB 362G 

<BE> 1160 GOSUB 4268 

<BF> 1170 GÖ5UB 2:370 

<JH> I180 SOUND 8,8,0^ 

<HL> 1190 sc=b:li~3:LE=0sfi=g 

<IG> 12O0 POKE 559,0:SETCOLOR 4,0,4 

<FI> 1210 ? «6;"fS" 

<BB> 1220 POSITION 29,9:? «6; "SCORE : " 

<JM> 1230 POSITION 38,10! 

<EI> 1240 POSITION 23,12: 

<EB> 1250 POSITION 30,I3i 

<EJ> 1268 POSITION 29,15! 

<0G> 1270 POSITION 30,10 

<ED> 1200 POSITION 25,18: 

<0L> 129Ö POSITION 38,13 

<CC> 1300 POSITION 29,21 

<N0> 1310 POSITION 30,22 

<AN> 1320 G05ÜB 20S0 

<KC> 1330 LE=LE+l!XF LE=10O THEN 1I7Ö 

<NG> 1340 POSITION 31,16:? »6 l LI 

<DD> 1350 POSITION 32~LENtSTR$*LEJ3 ,19:2 

ttOjLE 

<IN> 1360 POKE 559,8:5ETCOLÖR 4,0,4 

<HC> 1370 POKE 732, 8: GOSUB 2220 

<KP> 13SG FX=FI+1:IF FI = 6 THEN FI=Ö : GOTO 

12O0 

<MC> 1390 POSITION 31,22:? «6; FI 

<GI> 1400 BO=llIQ:BO=BO~LE*rl08 

<EH> 1410 IF BO<310 THEN BQ=310 

<MC> 1420 CK=0:CY=0;SO=2SO 

<DH> 1430 POSITION 36~LEH CSTR$ «SO J , IG : ? 

tte; sc 

<LH> 1440 POSITION 34~LEN «STRS CBOJ J , 13 ! 2 

»6;B0~iö 

<HI> 1450 A=U5R«EJ 5 POKE 559,62 

<FE> 1460 IF FI>1 THEN 1570 

<LL> 1470 RESTORE 15SO 

<LP> 14SO READ S : IF S<0 THEN 1560 

<CJ> 1490 1=10 :IF S-8 THEN L = ö 

<AD> 1500 SOUND 0,S,10,L 

<GB> 151Ö SOUND 1,S+I,10,L 

<PM> 1520 FOR ZS=1 TO 18 : NEKT Z5 

<J0> 1530 SOUND O,0,Q,O:SOUND 1,0, 0,0 

<NA> 1540 GOTO 14SO 

<DE> 1550 DATA 91,0,121,121,114,0,121,0, 
0,0,96,0,91,-1 

<CJ> 1560 FOR Z5-1 TO 200:NEKT ZS 

<JL> 1570 REM | - ■' " 



<AJ> 158Ö REM | 

t 
<KE> 1590 REM *- 



MAIN LOOP 



<KG> 1660 S0=S0~0,5:BO=BO-lO:IF BÖ=~18 T 
NEN POSITION 32,13:2 tt6j"O":60T0 3110 
<GJ> 1610 SOUND 0,50,10,10 
<ML> 162G SOUND 1,50+5,18,10 

<DJ> 1630 POSITION 36-LENCSTRSCSC3J ,10:2 
»6J SC 



<AA> 1640 IF BO<lGOO THEN POSITION 30,13 

:? «6;"ö" 

<HC> 1BSO IF B0<100 THEN POSITION 31,13! 

2 tt6;"0" 

<DD> I66O POSITION 34~LEH t 5TRS CBOJ 3 , 13 : ? 

«6; BÖ 
<KH> 1670 JS=5TICKC03 

<LK> 1680 IF JS-7 THEN CX=CX+2:IF CX>18 
THEN CK=CX-2;GÖTO 1570 

<KL> 1690 IF JS = 1I THEN CX=CX~2SIF CX<0 
THEN CX=CH+2:6ÜTO 1570 
<ÖD> 1700 IF JS=13 THEN CY-CY+2:IF CY>16 

THEN CY=CY-2:G0TO 1570 
<KM> 1710 IF JS=14 THEN CY=CY-2:IF CY<0 
THEN CY=CY+2:GOTÖ 1570 

<BE> 1720 A=USRtM,48+CK*4,38+CY#B,0,O5 
<BJ> 1730 A=USRCM,68+CX«4,38+CY*8,1,1J 
<IL> 1740 IF PEEK «7323=17 THEN A=USR CE» : 
GOTO 1170 

<NA> 1750 IF STRIGCO>=l THEN 1570 
<KD> 1760 SOUND O , O , O, O : SOUND 1,0, 0,0 
<PP> 1770 FOR ZS=1 TO 50 : NEKT ZS 
<!!!> 1780 LOCATE CX+1 3 CY+1, ZZ1 : LOCATE 30 
, 1,ZZ2 

<JJ> 1790 IF ZZ10ZZ2 THEN Z03G 
<HF> 180Ö LOCATE CX+3, CY+i, ZZ1 : LOCATE 32 
,1,ZZ2 

<JC> 1810 IF ZZ10ZZ2 THEN 2030 
<HL> 1820 LOCATE CH+5, CY+1 a ZZ1 : LOCATE 34 
,I,ZZ2 

<JE> 1830 IF ZZ10ZZ2 THEH 2030 
<HJ> 1840 LOCATE CX+1, CY+3 , ZZ1 : LOCATE 30 

J U" f *-rl £-4 -£. 

<JG> 1850 IF ZZ10ZZ2 THEN 2030 

<HP> I86O LOCATE CK+3 , CY+3 , ZZ1 : LOCATE 32 

,3,ZZ2 

<JI> 1870 IF ZZ10ZZ2 THEN 203O 

<IF> I88O LOCATE CX + 5 , CY+3 , ZZ1 : LOCATE 34 

j J£ j £^ £. -t 

<JK> 1898 IF ZZIOZZZ THEN 2830 

<HK> 1900 LOCATE CX+1, CY+5, ZZ1 : LOCATE 30 

,5,ZZ2 

<JD> 1910 IF ZZ10ZZ2 THEH 2030 

<TA> 1920 LOCATE CX+3 , CY+5 , ZZ1 : LOCATE 32 

,5,ZZ2 

<JF> 1930 TF ZZ1<>ZZ2 THEH 2030 

(IG) 1940 LOCATE CX+5 , CY+5 , ZZ1 : LOCATE 34 

,5,ZZ2 

<JH> 1950 IF ZZ1<>ZZ2 THEN 2030 

<OA> i960 SOUND O, 121 , IO, 10 : GOSUB 2010 

<LH> 1970 SOUND 1 , 96 , IO , 10 : GOSUB 2010 

<LJ> 1980 SOUHD 2,81,IO,10:GOSUB 2010 

<MC> 1990 FOR 5=0 TO 2 : SOUND S,0,8,0:HEX 

T 5! GOSUB 2010 

<CE> 2000 SC=SC+BO!GOTO 136Ö 

<PB> 201G FOR ZS=1 TO 30:HEXT ZS 

<KE> 2020 RETURN 

<DH> 2030 B0=B0-10ö:IF BO<10 THEN BO=10 

<MM>. 204O GOTO -1570 

<JF> 2O50 REM | 



<MC> 2060 REM 



<JO> 2O70 REM I- 



CHANGE LEUEL 



omputronic 



61 



fSl& 



<0G> 2888 COLOR 16ÜPLOT 0,8 

<LG> 2890 COLOR I62iPLOT 1,0:ORAHTO 24,0 

<ÖF> 2100 FOR Y=l TO 21 STEP 2 

<JF> 2118 COLOH 163 5PL0T 8,Y:PL8T 0,Y+1 

<0I> 212Ö FOR K=l TO 23 STEP 2 

<FL> 2130 Z=INTCRHDtB:»*3* 

<BF> 2140 IF Z=2 THEH Z=0 

<LM> 2150 COLOR 164+Z:PLOT X,Y 

<BM> 2160 COLOR 166+Z:PLÖT X+1,V 

<HL> 2170 COLOR 168+Z i PLOT X+1,Y+1 

<BJ> 2188 COLOR 170+Z:PL0T X,Y+1 

<GD> 2190 HEXT X 

<FH> 22O0 HEXT Y 

<KF> 2210 RETURH 

<JE> 2220 REM i 

— 1 

<KH> 2230 REM 1 CHANCE FXELD 

I 

<JM> 2240 REM ■ 



<GK> 2250 X=CINTCRHD«G1*8S»*2+1 

<GM> 2260 Y=:CIHTCRMDC0>*6>3*241 

<CC> 2270 COLOR 161:PL0T 29,0 

<OL> Z280 CDLOR 162:PL0T 3O,0äI>RAUT0 35, 

O 

<DA> 2290 FOR Y1=Y TO V+5 

<FK> 2300 COLOR 163 : PLOT 29,1+Y1~Y 

<CG> 2310 FOR Xi=X TO K+5 

<JO> 2320 LOCATE K1,Y1,ZZ 

<KX> 2330 COLOR ZZlPLOT 30+Xi~X,l+Yl-Y 

<JB> 2340 HEXT XI 

Ol» 23SO HEXT Yl 

<KL> 2360 RETURH 

<JK> 2370 REM l 

<BI> 2380 REM I TITLE-5CREEN 

I 

<KO> 2330 REM ' — " ' " ■ 



<FK> 2400 
<FB> 2410 

<HG> 2420 
L1PPHARDT 
<MP> 2430 

<KH> 2440 
<MG> 24SO 
<HE> 2460 
<JJ> 2470 
TSCZ,Z»=" 
<BH> 24SO 
<BG> 2490 
<G0> 25ÖÖ 
<BB> 2510 
<ftM> 2520 
<JH> 2530 
<GE> 2540 
<AC> 2550 
<»M> 2560 
<JM> 2570 



ßnt-EIHj'i 



2 «6; M »s , ':X=0iY=l 
T$C1,50J=" 

PRODUCED BY<" 
T$C51,i08J="< STEPHAN 

<< LCJ 1905" 

POSITION 0,5 
FOR Z=i TO 10Ö 
S=56 

IF T$CZ,Z:*=" " THEH 5=0 
IF T$CZ,Z*="<" THEH X=0:Y=Y+1: 
«•5=0 
X=X+1 

Position x,v:? »6;"ö" 

SOUND 0,S, 10,5/4 

GOSUB 360O 

POSITIOH X,Y:2 tt6jTSCZ,Z»; 

50UHD 0,0,0,0 

HEKT Z 

FOR Z5=l TO lOO 

GOSUB 3600: HEXT ZS 

REM I" "" ' "" " ' " 



<NM> 2580 REM 1 HIGH-SCORE TABLE 
I 



<PE> 
<JN> 
<EO> 2698 



<KF> 2590 REM ' 

<LL> 2600 IF 3C<5CC5J THEH 5C=OsGÜTO 269 



<BG> 2610 FOR Z=l TO 5 : IF 5C>=5C«Z» THEH 

ST=ZtGÖTO 2630 
<KH> 2620 HEXT Z'.GOTO 2690 
<0A> 2630 A=26:F0R Z=5 TO ST-1 STEP ~1 
<OH> 2640 SCCZ+1J=SCCZS 
<AP> 2650 N$CA+5,A+93=N$CA,A+45 
<MC> 2660 A=A-5:NEXT Z 

2670 A=A+5üN=A 

2680 SC CST3 =5C : NS CA, A+4J =" " 

2 tt6;"R'*:A=l 
<pj> 2700 Position ll,ls? «6 ; "[JWdIBSdiiiUä 
■üMäMBHB" 

<FB> 2710 FOR Z=l TO 5 

<GB> 2720 POSITION 13,4+Z*25? tt&£N$CA,A+ 

4»;" eoeooo" 

<EF> 2730 POSITION 27~LEH C5TR5 CSC CZI 5 » , 4 

+Z*2S? »6;SCCZS 

<LP> 2740 A=A+S:NEXT Z 

<BN> 2758 GOSUB 3480 

<FL> 2760 IF SC>0 THEH 2800 

<AH> 277Ö FOR ZS=1 TO 200 

<EA> 2780 GOSUB 3600! HEXT ZS 

<HH> 2790 GOTO 2370 

Ol> 2800 REM | ' " "" ■ 

<KO> 2810 REM | HAME-FILIHG v 
I 

<KB> 2820 REM * - » — ■" ■■ " — ■ ■ ' ■■ " 



<PH> 


2830 


Hl-Xm^B" 


<KG> 


2S40 


R NAME," 


<IG> 


2858 


KLMNÖPORST 


<EM> 


2860 


<BK> 


2870 


<KL> 


2880 


<00> 


2890 


<FN> 


2900 


<OE> 


2910 


<BC> 


2920 


<FD> 


2930 


<FC> 


2940 


<EO> 


2950 


<CJ> 


2960 


<BM> 


2970 


<KH> 


2980 


<GG> 


2990 


<ML> 


3OO0 


<BA> 


3010 


<MN> 


3020 


<FI> 


3030 


<JI> 


3040 


<GD> 


3050 


R*CZZ-128J 


<PJ> 


3060 


<GC> 


3078 


<IJ> 


3080 



Position 11,1:2 t*6;"U££ÜEfcH!ldjä 

POSITION 12,18:2 «6; "ENTER YOU 

POSITIOH 6,20:2 «6:" M»MJa|JHIHI: 

X=6:ZZ=193:A=i 

COLOR 65:PL0T X,20 

JS=STICKCOJ 

IF JS<>7 AHB JSOll THEH 3000 

COLOR ZZ:PLOT X,20 

IF JS=7 THEH X=K+t 

IF JS=11 THEH X=X-1 

IF K=34 THEH X=6 

IF X=5 THEH X=33 

LOCATE K,20,ZZ 

COLOR ZZ+128:PLÖT X,28 

FOR 5=14 TO O STEP ~2 

SOUND 0,5+50,10,5 

HEXT S 

IF 5TRIGC0J=1 THEH 2880 

FOR 5=15 TO O STEP -3 

SOUND 0,250-5, 10, S 

HEXT 5 

COLOR ZZ-128JPL0T 12+A,4+ST*2 

H$Ct5T-iJ*5+A, CST-1J*5+A+4*=CH 

FOR ZS=1 TO 58 i HEXT ZS 
A=A+1:IF A<6 THEH 2880 
POSITIOH 12,18:2 «6i" 
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<FG> 3098 POSITION 6,2«:? 1*6 r 

«• 

<AK> 3100 5C=8!GOTO 277« 
<JI» 3110 REM | 



<BE> 3120 REM | LIVE LOST 

1 
<JM> 3130 REM ' 



<JH> 


314Ö 


<HH> 


3150 


<LG> 


3160 


<HI> 


3170 


<GG> 


318Ö 


<KG> 


3190 


<JP> 


3200 


<KH> 


3210 


<JM> 


3220 


<Hö> 


3230 


<FE> 


3240 


<JI> 


3250 



sound o,o,o,o;souhd 1,0,0,0 

A-USfltF) 

POSITION 30,16:? »6S'*0"» 

LI-LI-l: POSITION 31,16:? »6; LI 

FOR SO=15 TO 1 STEP -1 

SOUND O , INT «RND (03*250+5», 8, 50 

SOUND 1, INT «RHD «0:1*250+5:1,8, 50 

HEXT SO 

SOUND Ö,0,0,0:5ÖUHD 1,0,0,0 

FOR Z=I TO 100: HEXT Z 

IF LI>0 THEN 1360 

REM i 



<PN> 3260 REM I GAME OVER 

I 
<KB> 3270 REM ' 



<BP> 

11 

<IK> 

OOOl 

<JF> 

(JI> 

<0J> 

O 

<0M> 

1 

<CD> 

12 

<FB> 

<IC> 

<IG> 

<CE> 

<JN> 

<DI> 

<JK> 

<KK> 

<GD> 

<KA> 

<HG> 

<DM> 

<NF> 

<JH> 



3280 COLOR I63:PLOT 28, 7 : DRAMTO 20, 

329© COLOR 32:PLOT S,7:DRAWTÖ 19,7. 

3300 COLOR 32SPL0T 5,8:DRAHT0 IS, 6 
3310 COLOR 32IPL0T 5,9:DRAHT0 IS, 9 
3326 COLOR 32:PL0T 5, 10: DR AUTO 19,1 

3330 COLOR 32äPL0T 5,11:DRAWT0 19,1 

3340 COLOR 162:PL0T 5,12:DRAMT0 19« 

33SO COLOR 175 i PLOT 20,12 

3360 FOR Z=l TO 100; NEKT Z 

3370 POSITION 0,9:? «6;"GAME OVER" 

3380 FOR Z=I4 TO 6 STEP -1 

3390 FOR 50=© TO 240 STEP 30 

3400 SOUND 0,50,8, Z 

3410 SOUND 1,50*5,8,2 

3420 NEKT SO 

3430 NEKT Z 

3440 SOUND S,0» O, 8 : SOUND 1,0,0,0 

3450 FOR ZS=1 TO SO 

3460 GOSUB 3600: NEKT ZS 

3470 GOTO 2570 

3460 REM | 



<EE> 349Ö REM I PREPARATI0K5 



<JN> 3500 REM 



<P0> 3510 PÖKE 16,64:P0KE 53774,64 

<MD> 3520 POKE 77, O 

<B0> 3530 SETCOLOR 0,0,0 

<FF> 3540 SETCOLOR 1,0,14 

<F0> 3550 SETCOLOR 2,7,14 

<CL> 3560 SETCOLOR 3,7,0 

<CK> 3570 SETCOLOR 4,0,4 



<CJ> 35«0 

<LB> 3590 

<L0> 3680 
THEN POP 

<KK> 3610 

<JJ> 3620 
— I 

<PL> 3630 

I 

<KC> 3640 



POKE 784,126: POKE 785,126 

RETURN 

IF PEEK (532791=6 OR STRI6tfl*=Ö 

;GOTO 1180 

RETURN 

REM % """"" 

REM 1 DATAS FOR NEW F1GURES 
REH * 



<LN> 

<EJ> 

<PD> 

<ID> 

Z+3JJ 

<GL> 

<NC> 

<PI> 

03 

<AM> 

55 

<A0> 

03 

<GA> 

85 

<DK> 

70 

<HE> 

87 

<EG> 

71 

<HC> 

55 

<FA> 

<FI> 

55 
<DM> 
55 
<AI> 
00 
<AB> 
00 
<AA> 
00 
<CG> 
. 55 
<CC> 
OO 
<8F> 
OO 
<DC> 
OO 
<CF> 
00 
<BI> 
OO 
<CJ> 
00 
<CL> 
00 
<BF> 
00 



3650 RESTORE 3710 

3660 READ C,D$:IF C<0 THEN RETURN 

3670 FOR Z=0 TO 21 STEP 3 

3688 POKE R*256+8*C+Z/3,VAL*D$CZ+1# 

3698 NEKT Z 

3700 GOTO 3660 

3710 DATA 01,000000000800000000003« 



3720 DATA 82,0000000000880000002552 
3730 DATA 03,003003003003003803003« 
3740 DATA 84, 0850858850850850850850 
3750 DATA 85,1701701701701701701701 
3760 DATA 06,0870870870870878870870 
3770 DATA «7,1711711711711711711711 
3780 DATA 08,0870870870870878872552 
3790 DATA 09,1711711711711711712552 
3800 DATA 10,0850850850850850852552 
3810 DATA 11,1781701701701701702552 
3820 DATA 12,012012012012000012012« 
3830 DATA 13,0000000000630000000000 
3840 DATA 14,0000000000000000120120 
3850 DATA 15,0030030030030030032552 
3860 DATA 16,0120510510510510510128 
3870 DATA 17,8030030030030030030030 
3880 DATA 18,8680830030120486480630 
3890 DATA 19,0600030030630030030600 
3SOO DATA 20,0510510510630030030030 
3910 DATA 21,0630480480800038030600 
3920 DATA 22,0150480480608510510120 
3330 BATA 23,0630030030030030030030 
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<CD> 


3940 


DATA 


00 






<CC> 


3950 


DATA 


00 






<AM> 


3960 


DATA 


00 






<CJ> 


3970 


DATA 


OO 






<CL> 


3980 


DATA 


oo 






<EL> 


3990 


DATA 


00 






<BH> 


4000 


DATA 


00 






<EA> 


4618 


DATA 


OO 






<EF> 


4020 


DATA 


00 






<CP> 


4030 


DATA 


eo 






<BR> 


404O 


DATA 


oo 






<AJ> 


4050 


DATA 


00 






<AO> 


406O 


DATA 


00 






<CC> 


4070 


DATA 


00 






<EL> 


4080 


DATA 


00 






<CP> 


4G98 


DATA 


00 






<CT> 


4100 


DATA 


00 






<BL> 


4118 


DATA 


00 






<DF> 


4120 


DATA 


00 






<CC> 


4130 


DATA 


OO 






<B0> 


4140 


DATA 


00 






<CD> 


4150 


DATA 


OO 






<BI» 


4160 


DATA 


00 






<CH> 


4170 


DATA 


00 






<CD> 


4180 


DATA 


eo 






<0B> 


4190 


DATA 



24,0120510510630510510120 
25, 0150510510150030030600 
26, 0000120120000120120000 
33, 0120510510530510510510 
34, 0600510510600510510600 
35, 0150480480480480480150 
36, 868O51O51O510510518600 
37, 0030480480630480480630 
38, 0630480480630480430480 
39, 0150480480510510510150 
40, 0510510510630510510510 
41, 0120120120120120120120 
42, 0030030030030030030600 
43, 0510510510600510510510 
44, 0480480480480480480630 
45,0510630630630516510510 
46, 0510510630630630510516 
47, 8128518518518510510120 
48, 0600510510680480480480 
49,0120510510510510510150 
SO, 0600510510600510510510 
51 , O15O48O48012O03003O6OO 
52,0630120120120120120120 
53, 0510510510510510510630 
54,0510510510510510510120 
55,0510510510630630630510 



OO 

<B0> 4200 DATA 56,0510510518126518516510 

OO 

<BK> 4210 DATA 57,0510510510518120120120 

80 

<C0> 4220 DATA 58,0630030030120480480630 

OO 

<EF> 4238 DATA 59,0600400480480480488600 

00 

<BC> 4240 DATA 61, 0150030030030030030150 

08 

<JP> 4250 DATA -1,0 

<JK> 4260 REH r ,, -— ,.,. .,,,.- 

""1 
<ME> 4270 REM 1 MACHXNEROUTXHE 

I 
<KD> 4280 REM ' —-—»—_-_—______—. 



<FI> 4290 ES Cl,9Ci="hhh«V/hh« 1/hhHh/B 1/0 

m»n.ms Bi Ulfarl/M w l/EM PW Eil frBmi/UJm I 

<DH> 4300 E5e91,i805= , H/hhSSi/hh»J/hhB//J 

iEcS l^L£fcilKlI]<Eir3^vniISOI//E\/mS//^ 

<IP> 4310 E5C181,2703="^PB A SEI]eBai^Bi^B 

/mnv^ /HEHva r/»-/K*GH-Ha r/» m /m r/H" 

<CC> 4320 ESC27i,3603="-/MP/ta-/M-/nr/*Bf 

QFOlEEnHBS^wf/^PS EtH*/rfHI^HWli//Hi /D\ 

<IX> 4330 E$C361,4503="-Hg3i<S|^gi*f/aiS// 

i J m// Z&®*-*~/3t£m i *S^BiE3*ra\8*Äl]8tJt«5S3l v/im 

<IA> 4340 E$C451,4383="TH^4EH//B*/!rVffl 

■4/EHE+hEI W 61^\avG»*S*" 

<0K> 4358 E5C476, 4763 =CHR$ «343 

<BG> 4360 I = ADR tES> :K=:X+86:E=I+473: A = U5R 

(1,51,1,1) SRE5TÖRE 448© 

<C0> 4370 FOR £=A TO A+101 

<GC> 4380 READ D;POKE Z,D 

<ID> 4390 HEKT Z: RETURM 

<FC> 4480 DATA 0,31,31,16,16,16,16,0,0,0 

,8,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

<PH> 4410 DATA 0,0,0,0,0,0,8,0,0,0,0,0,0 

, 0,0,8,0,0, 16, 16, 16, 16, 31, 31,0 

<IIM> 4428 DATA 8 , SEI , 31, 1, 1, 1 , 1, 0, O, O, O, O 

,0,0, 0^0,0,0,0,0, 0,8,8,0,0,0 

<CB> 4430 DATA 0,8,0,0,0,8,0,0,0,0,0,8,0 

,8,0,8,0,0,1,1,1,1,31,31,0 



uper-Reversi Ein Stück Leben für Strategen 

Stellen Sie Ihr Dame-Brett in die Ecke, und hocken Sie sich an Ihren kleinen Atari. Freude kommt auf, wenn Sie sich daran versuchen, den 
Computer im Reversi- Spiel zu schlagen. Aber wenn Sie lang genug üben, werden Sie sicherlich nicht nur den Computer irgendwann schlagen, 
sondern auch die unliebsame Schwiegermutter, die schon seit der Jahrhundert-Wende ein absolutes As in Sachen Brettspiele ist. 



Hier erst einmal ein paar Spielhinweise für 
alle Atari-User, die das altbekannte Reversi 
noch nicht kennen: 
Ziel des Spiels ist es, möglichst viele Steine 

64 



seines Gegners umzudrehen, so daß am 
Ende eine größere Anzahl eigener Steine 
auf dem Brett vorhanden sind. Gegneri- 
sche Steine können Sie dann umdrehen, 



wenn Sie einen oder mehrere Steine mit 
Hilfe eines weiteren Steines mit Ihrer Far- 
be einschließen. Durch einen Piepston teilt 
Ihnen der Computer mit, daß Sie auf das 

Computronic 



fit& 



eingepeilte Feld nicht setzen dürfen. Sind 
alle 64 Steine gesetzt, ist das Spiel beendet. 



ren. Dabei wird der Bildschirm abgeschal- 
tet (POKE'559,KO). 



Zum Programm: 

Nach der Eingabe RUN benötigt das Pro- 
gramm etwa 40 Sekunden zum Initialisie- 

<EA> 30 READ K±,K2,K3,K4,K5,K6,K7,K8,K±0 

«DATA 1,2,3,4,0,6,7,8,10 

<CC> 48 GRAPHICS KÖiPÜKE 752,KIiP0KE 709 

,15SP0KE 71O,K0 

<PI» 50 POSITION K7jK3:? "REVERSI HIRD I 

NITIALISIERT" 

<GG> 60 POSITIOM K3,K7S? •• BITTE 40 

SEK. GEDULD " 
<EH> 70 FOR I=KO TO 758 S HEXT I : FOR 1=15 
TO KO STEP -0.25: POKE 709, IS NEKT I : T CKR 
Sf±25> 

<K8> 80 POKE 559,KO:PQKE 7S2,K1;G0TÖ 860 
<AJ> 90 POKE 7±±,K2:M=29 
<HF> 100 REM 

<BK> Hfl FOR I=K± TO K2:P0KE 77,K0:P0KE 
704 , K2+K10»CI=K±1 

<HE> 120 POSITIOM ±7,21:? " " : IF PA 
SS = K2 THEN 1860 

<FK> ±30 X±=K7*tX=K23 I V±=K7*CI=K1J 
<MN> ±40 K=6Ö+±±2*CI=K2J : Y=68 ! 0=USR CMOUE 
, KO,PMB, CURSOR, X,Y,K4J 

<DI> ±50 FOR V-K10 TO KO STEP -Kl ! SOUND 
KO , 60 , K10 , U ! SOUND Kl , 29+92« CI-K2J , K±0 , V S 
POKE 7H,PEEKC7113 + tI=K±J-CI-K23 : NEXT W 
<FD> ±60 F = KO:OH P «13 + K1 GOTO 2±O,450,45 
O 

<CA> ±70 HEXT I 

<OE> 190 M=M-K1:IF M<KO THEN ±860 
<GF> 190 GOTO ±±ö 
<HG> 200 REM 

<EB> 210 HAK=KO:TEMPK=KO:TEMPY=:K0!FÖR Kl 
=K0 TO K7:FOR Y1=K0 TO K7 
<KB> 220 IF GRIDCXI,Y1> THEN 270 
<BL> 230 Wft~KO:FOR Dl=-K± TO Kl:FOR D2-~ 
K± TO Kl 

<GF> Z40 TRAP 268 

<BH> 250 IF GRXDCX1+D1,Y1*D23=K3~X THEN 
280 

<EF> 260 TRAP 270: NEKT D2:HEXT Dl 
<MH> 270 HEXT YI : NEXT K± i Xl-TEMPX S YI-TEM 

py:f=ko:goto 378 

<NG> 280 FOR A~K2 TO K7:TRAP 300 l TEMP=GR 

ID?X1+D1»A,Y±+D2*A2 :IF NOT TEMP THEN 26 

« 

<KJ> 298 IF T£MP=I THEK 310 

<B0> 300 NEKT A:GOTO 260 

<GL> 310 VA=VA+A 

<JB> 320 IF X±=KO OR X±=K7 THEN UA-UAWK4 

<JE> 330 IF Yl=KO OR V1=K7 THEN VA=yA*K4 

<GH> 3*0 IF X1=K1 OR X1=K6 OR Y1=K1 OR Y 

I=K6 THEH VA=VA/K6 

<0J> 358 IF WA>MAX OR CVA=MAX AND RHDCKO 

)>0.5) THEN mak=va:tempx=xi:tempy=y± 

<6K> 360 GOTO 260 

<MH> 370 IF NOT MAK THEN 530 

<JH> 380 DESTK=124+K8»TEMPK-K8»TEMPV:DE5 

TY=40+K4*CTEMPX+TEMPY3 

<LA> 398 RÖT=ROT+K4:IF R0T>16 THEN ROT-K 

4 



Nach Beendigung der Wartezeit erscheint 
das Spielfeld. Mit OPTION (bzw. SE- 
LECT) kann man sich für Spieler eins oder 



zwei entscheiden, bzw. zwischen Schwarz 
und Weiß wählen. Am unteren Bildschirm- 
rand werden Score und noch zu setzende 
Steine angezeigt. Ran an die Bouletten, 
und latzen Sie den Computer oder ein Re- 
versi-As in Ihrem Freundeskreis! 

<A0> 40O K=X+ttDESTX>X3~CDESTX<X3**K2:Y= 

Y+«DESTY>Y>-CDESTY<Y3 

<DF> 4±0 0~USRCMO«E,KO # PMBjCURSOR+ROTjX, 

Y,K4> 

<P0> 420 IF X=DE5TK AND Y=DESTY THEM S60 

<GM> 430 GOTO 390 

<HM> 440 REM 

<MH> 450 D±=K0:D2=KO:GOTO 450+STICK CP «13 

-Kl) 

<IP> 455 IF X±<K7 THEM X±=X±+K±:0±=Kl:D2 

=0.5: GOTO 470 

<LM> 456 IF Yl>KO THEN Y1=Y±~K1 : D1=K± : D2 

=-O.S:GOTO 470 

<FM> 457 IF XKK7 ÄND Yl>KO THEN X1=K±+K 

l:Yl=Yl-Kl:Dl=:K2:G0Tö 470 

<MD> 459 IF YKK7 THEM Y1=Y1+K± : D1=~K± S D 

2=0.S:G0T0 476 

<JH> 460 IF X1>0 THEM X1=X±-K1 i Dl=-Kl SD2 

=~0.5:G0Tö 470 

<IE> 461 IF K1>K0 AND Y±<K7 THEN X1=X±~K 

±:Yl=Yl+K±:D±=~K2:GOTO 470 

<FM> 463 IF X±<K7 AMD Y1<K7 THEM X1=K±+K 

±:Y±=Y±+K±:D2=K1:G0T0 47ö 

<IE> 464 IF X±>KO AMD Y±>KO THEM X1=X1-K 

1«.Y1=:Y±-K±:D2=:-K1 : GOTO 470* 

<LD> 465 ROT=ROT+K4:IF R0T>±8 THEN ROT=K 

4 

<FA> 466 a=USRtMOUE,KO,PMB,CURSGR+ROT,X, 

Y,K4» 5GOTO 430 

<IK> 470 FOR J=K1 TO K8 : X=X+D1 : Y=Y+D2 : RO 

T=R0T+K4:IF R0T>±6 THEN R0T=K4 

<PP> 480 0=USRCM0 ) ü i E,K0,PMB,CURS0R+ROT,X, 

Y„K4J TMEXT J 

<FE> 490 IF NOT STRIG «P «IJ -K±3 THEM 56© 

<PF> 500 IF PEEKC7643=KI0 THEM POKE 764, 

25S:GOTO 520 

<GI> 510 GOTO 4SO 

<BH> 520 0=U5R CMOVE , KO , PMB, CURSOR, K,Y,K4 

3 

<EF> 530 POSITION ±7,21:2 "I PA5S":PASS= 

PASS+KI5F0R V=K8 TO K8 STEP ~K± : FOR U±=V 

TO KO STEP -Kl 
<AJ> 540 SOUND KO, 60, KIO, VI i SOUND Kl, 29+ 
92WCI=K25 ,K10,U±:MEXT V±:NEXT UlGÖTO 800 
<H0> 550 REM 

<GF> 560 0=USRCM0UE,K8,PMB, CURSOR, K,Y,K4 
3SXF 6RID«X±,Y1J THEN 840 

<JJ> 578 FOR D±=~K± TO Kl i FOR D2=~K± TO 
K± 

<GK> 580 TRAP 600 

<BM> 590 IF GRIDtX±+Dl,Yi+D23=K3-I THEM 
620 ^ 

<AM> 600 TRAP 610: NEKT D2 : HEXT D± : IF MO 
T F THEN 840 
<GI> 610 GOTO 800 

<NF> 620 FOR A=K2 TO K7JTRAP 600 : TEMP-GR 
IDCX±4D1*A, Y±+D2*AJ : IF HOT TEMP THEM 60 
O 
<KO> 630 IF TEMPnl THEM 650 
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<CI» 640 MEKT A:GOTO 608 

<HH> 650 XF HOT F THEH 5C t K3~I) =5C CK3~I 

)+Kl:GÖ5UB 728 

<JO> 660 IF PASS>K0 THEH PASS=PASS~K1 

<EF> 670 F=Ki:FOR 8=K1 TO A-Ki 

<AM> 680 X1=KI+DX:Y1=Y1+D2:G0SUB 720 

<EF> 690 NEHT B l Xi=Xl-Di* CB-Kli : Y1=Y1-D2 

<GG> 700 GOTO 600 
<HM> 710 REH 

<OD> 720 Al-19+Kl+Hl-YI-YI:BI=K4+Xi+Yi:L 
OCATE Al,ei,Z 

<PE> 730 IF CZ=116 DR Z=235 AND I = K1 THE 
N POSITION fll f Bi!? CHRSC19J ;CHR5C203 
<PD> 740 IF CZ=117 OR Z=253 AND I = K1 THE 
H POSITION AI, Bit? CHR$C2±:> ;CHR$C22J 
<PL> 758 IF CZ=116 OR Z=195 AND I=K2 THE 
H POSITION A1,B1:? CHR$ C23J ; CHR$ C243 
<PK> 760 IF <Z=117 OR Z=21J flHD I=K2 THE 
N POSITION* 01,Bi:? CHR$C25> ;CHR5C26S 
<HH> 770 FOR V=K4 TO KO STEP -Kl S SOU^D IC 
0, 68, K18,V: SOUND Kl , 29+92« CI-K2J ,K19,U:M 
EKT M 

<EJ> 760 5C CIl^SC CI3 +K1 5 SC CK3-X5 =5C CK3-I 
J-KI : GRID «KI jYU =1 1 RETURN 
<IE> 790 REM 

<IJ> OOO POSITION KS,18:? SCCKIJ;" "SPßS 
ITION 36,18s? SCCK23;'" " 

<J0> 810 POSITION K10+26«CI=K23 ,20:? H} " 
■■ 

<PP> 820 IF SCCKiJ=KO OR SC CK23 ~KÖ THEN 

1860 

<GM> 830 GOTO 170 

<Hö> 840 FOR V = IS TO KO STEP ~G . 2: SOUND 

K0,72,K6,M:NEHT U ! GOTO 450 

<IB> 850 REM 

<IA> 860 DL=PEEKt5603+PEEK £5613*256 

<AD> 870 POKE DL+K3, 69 i POKE DL+K6,K5:FQR 

I=K7 TO 28: POKE DL+I , K4 : NEXT I 
<JM> 888 DIM GRID«K7,K7> , P CK2J , SC CK25 ,PL 
St40l 

<JI> 890 PL$="CÜMPUTER STICK ONE STICK 
TMO COMPUTER " 

<JH> 900 DIM C$C30723 :C=ADfteC£* JCH=CINT£ 
C^1024 J + K1J *K4 ; D=CH»256-C : POKE 756 , CH 
<LI> 910 PMBA5E-CH*K4tPOKE 54279, PMBASE ! 
PMB=PMBASE*256:POKE 53277, K3 : POKE 623, Kl 

<BA> 920 mome=pmb:spih=:moue + ioo:cursor=s 

PIN+84 ! BRITE=CURS0R+20 

<JJ> 930 FOR I=K8 TO 215 : READ A;POKE MOV 

E+I,A:NEKT I 

<0P> 940 DATA 216,104,104,104,133,213,10 

4,24,105,2,133,206,104,133,205,104,133,2 

04,104,133,203,104,104,133,208 

<BD> 950 DATA 104,104,133,209,104,104,24 

,101,209,133,207,166,213,240,16,165,205, 

24 , 105, 128 , 133 , 205 , 165 , 206 , 105 

<DM> 960 DATA 0,133,286,202,208,240,160, 

0,182,0,196,209,144,19,196,207,176, 15,13 

2,212, 138,168,177,203,164 

<AM> 970 DATA 212,145,205,232,169,0,240, 

4,169,0,145,205,200,192,123,208,224,166, 

213,165,208,157,0,208,96 

<DH> 980 DATA 28,62,127,127,127,62,28,8, 



28,62,62,62,28,8,8,8,28,28,28,8,8 

<EO> 990 DATA 8,8,8,8,8,8,8,8,8,28,28,28 

,8,8,8,28,62,62,62,28,8 

<IJ> 1000 DATA 28,62,127,127,127,62,28,8 

,28,62,127,62,28,0,0,0,28,127,28,0,0 

<NC> 1Ö10 DATA 0,0,0,127,0,0,0,0,0,28,12 

7,28,0,0,0,28,62,127,62,28,0 

<HD> 1020 DATA 255,129,129,255,238,1,129 

,221,119,128,129,187,187,129,128,119,221 

j JL -4^ j > JL f ju -v> O 

<MF> 1030 DATA 0,2,4,6,8,12,14,12,8,6,4, 

2 

<EJ> 1040 FOR I^KO TO 983 {READ A : POKE C+ 

D+I,A:NEHT I 

<CM> 1050 DATA 0,0,0,0,0,0,0,0,12,12,12, 

12,0,8,4,0,0,0,0,8,0,0,0,8 

<LF> 1060 DATA 0,3,15,63,255,254,250,234 

,0,3,15,63,255,253,245,213,255,253,245,2 

13,85,149,165,169 

<BA> 1070 DATA 255,254,250,234,178,106,9 

0,86,255, 127,95*87,85,86,90,106,255,191, 

175, 171, 170, 169i 165, 149 

<MD> 1688 DATA 0,192,240,252,255,191,175 

,171,0,192,240,252,255,127,95,3 7,170,234 

,250,254,255,127,95,87 

<AL> 1890 DATA 85, 213 „ 245 , 253 , 255 , 127 , 95 

,87,170,16 9,165,149,85,213,245,253,85,86 

,90,186, 170,234,250,254 

<BE> 1100 DATA 0,21,42,63,42,21,0,0,12,5 

1,51,51,63,42,4,0,12,68,12,12, 63,42, 2±,0 

<PF> lllO DATA 60,3,12,48,63,42,21,0,63, 

3, 12, 3, 63, 42, 20, 8,51,51, 63, 15, 15,10,5,0 

<PH> 1120 DATA 63,48,60,3,63,42,20,0,15, 

48,60, 51,63,4 2,4,0,63,3,3,12,12,40,20,0 

<DM> 1130 DATA 12,51,12,51,63,42,4,0,12, 

51,15,3,63,42,28,0,170,106,90,86,85,86,9 

0,106 

<CH> 1140 DATA 85,149,165,169,170,169,16 

5,149,170,169,165,149,85,149,165,169,85, 

86,98,106,170,106,90,86 

<G0> 1158 DATA 255,127,95,87,85,21,5,1,2 

55,254,250,234,178,168,168,128,8,8,8,0,0 

,0,0,0 

<KK> 1168 DATA 12,51,51,63,51,34,17,0,60 

,51,60,51,63,42,28,0, 15,48,48,48,63,42,5 

,0 

<0I> 1170 DATA 60,51,51,51,63,42,20,0,63 

,48,60,48,63,42,21,0,63,48,60,48,48,32,1 

6,0 

<JO> 1188 DATA 15,48,51,51,63,42,5,0,51, 

51,63,51,51,34,17,0,63,12,12,12,63,42,21 

,o 

<BF> 1190 DATA 3,3,3,3,63,42,20,0,51,51, 

68, 51, 51, 34, 17,0,48,48, 48, 48, 63, 42, 21,0 

<JJ> 1288 DATA 51,63,63,51,51,34,17,0,60 

,51,51,51,51,34,17,0,12,51,51,51,63,42,4 

,9 

<JG> 1210 DATA 60,51,51,60,48,32,16,0,12 

, 51 , 51 , 51 , 63 , 40 , 5 , O^, 60 , 51 , 51 , 60 , 51 , 34 , 17 

,0 

<PI> 1220 DATA 15,48,12,3,63,42,20,0,63, 

12,12,12,12,8,4,0,51,51,51,51,63,42,4,0 

<GO> 1230 DATA 51,51,51,51,63,8,4,0,51,5 

1,51,63,63,34,17,0,51,51,12,51,51,34,17, 



Coraiputronic 
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<BH> 1246 DATA 51, 51 , 12 , 12 , 12 , 8 , 4 , , 63, 3 

,12,48,53,42,21,0,179,106,98,66,85,87,95 

,127 

<KB> 125Ö DATA 05,143,165,169,170,171,17 

5,191,170,171,175,191,255,254,250,234,85 

,87,95,127,255,254,250,234 

<AH> 1260 DATO 255,127,95,87,85,87,95,12 

7,0,3,15,63,255,127,95,87,0,3,1,6,26,106 

,106,106 

<AD> 1270 DATA 0,0,85,170,170,170,170,17 

0,0,0,85,170,171,175,131,160,0,6,85,170, 

255,192,255,15 

<EF> 1280 DATA 0,0,85,170,239,143,143,20 

7,0,0,85,170,239,207,207,207,0,0,85,170, 

255,287,255,255 

<DN> 129© DATA 0,0,85,170,175,207,207,14 

3,0,0,85,170,255,192,254,202,0,0,85,170, 

239,143,143,143 

<EE> 1300 DATA O , O , 85, 170, 171, 239, 195 , 16 

0,0,0,85,170,239,131,163,227,0,0,85,170, 

254,250,248,248 

<DB> 1310 DATA 0,0,85,170,191,252,252,25 

2,0,0,85,170,250,252,252,252,0,0,85,170, 

255,252,252,252 

<JJ> 1320 DATA 0,0,85,170,250,254,254,25 

4,0,0,64,144,164,169,169,169,95,124,255, 

255,255,63,79,80 

<BH> 1330 DATA 245,61,223,255,255,252,24 

1,5,175,188,255,255,255,63,143,160,250,6 

2,207,255,255,252,242,10 

<DM> 1340 DATA 80,67,0,0,0,192,112,95,5, 

193,48,0,0,3,13,245,160,131,0,0,0,192,17 

6,175 

<NB> 1350 DATA 10,194,48,0,6,3,14,250,0, 

0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

<FI> 1360 »ATA 0,0,0,0,0,0,8,0,0,0,0,0,0 

,0,0,0,0,0,0,0,0,0,0,6 

<DB> 1370 DftTA 255,253,245,213,85,213,24 

5,253,106,106,106,26,6,1,0,0,170,170,170 

,170,170,85,0,0 

<HA> 138© »ATA 143,143,143,128,170,85,0, 

0,255,255,255,2,170,85,0,0,207,207,131,1 

60,170,85,6,0 

<»K> 1390 DATA 207,207,143,128,170,85,6, 

0,194,2 34, 234,170,170,85,6,0,143,143,143 

,128,170,85,0,0 

<HC> 1400 DATA 255,255,255,0,170,85,0,6, 

207,207,207,128,170,85,0,6,195,224,232,1 

78,170,85,0,8 

<KD> 1410 DATA 255,254,58,42,178,85,0,6, 

239,207,143,128,170,85,0,0,252,252,252,1 

6,107,85,0,0 

<ßM> 1420 DöTft 255,255,63,0,170,85,0,6,2 

52 , 252, 248 , 40 , 170 , 85 , 0, O, 252 , 252 , 252 ,8,1 

70,85,6,0 

<LD> 1438 DATA 254,254,254,10,178,85,6,8 

,169,169,169,164,144,64,0,0,85,85,85,85, 

85,85,85,85 

<EE> 1448 DATA 176, 178, 170, 170 , 170, 170, 1 

70, 170, 0,6, 0,6, 8, 3, 15, 63, 0,0, 8, 6,0, 192,2 

40,252 

<FJ> 1456 DATA 85,21,5,1,0,0,0,8,170,168 

,160, 128, 0,0, 0,0, 8,192, 240, 252, 255, 254, 2 



50, 234 

<KP> 1460 REM 

<BF> 1470 P0KE 708, K5: POKE 709, KIO: POKE 

718,15: POKE 711, K8: POKE 712, K0 

<PM> 1488 RESTORE 1490 : POSITION K4,K0:F0 

R X = K4 TO 35!R£AD A!? CHRS CA3 ; : HEHT K:? 

<8M> 1490 DATA 1,2,2,3,4,5,6,6,7,8,9,10, 

7,8,9,16,6,6,9,10,7,11,4,12,13,14,15,16, 

17 ,2,2,18 

<DH> 1560 POSITION K4,K1;? "ahbCdedf ghi j 

j jiklhi JJJdnnopqrbbs" 

<HA> 1510 C-Kl:FÖft K=KO T0 K7 5 FOR V=KO T 

O K7 

<EH> 1520 POSITION 19+X+X-Y-Y, 4 + X+Y ! 7 CH 

RS C116+C) ; CHRS C116+C5 i CHRS C58+C3 1 CHRS C60 

+ C3 

<A0> 1536 C= HOT ClNEXT Y : C= NOT C:HEHT 

X 

<BL> 1540 C=KlSFÖR X=K8 TO K6 

<HC> 1556 POSITION 16-X-X , K4+K : 2 CHRS C24 

65 ; CHRS {163+CJ: CHRS «165+CJ 

<HE> 1560 POSITION 21+X+X, K4+K : 2 CHRS C16 

7+C J ; CHRS CI69+C J ; CHRS f 2473 

<HL> 1576 POSITION I5-X-X, 18~K : 2 CHRS CI2 

03 ; CHRS C1909 ; CHRS «171 + C3 } CHRS«I73+C5 

<HE> 1580 POSITION 21+X+X, 18~X : ? CHRS C21 

9 + CJ ; CHRS «221+C J l CHRS C191 J ; CHRS C121) 

<FE> 1590 C~ NOT C : NEXT X 

<AL> 160O FOR I-K0 TO K8 : READ A,B,C:F0R 

J-KO TO CfREAD D:COLÖR D : P1.ÖT A+J,B:NEXT 

J:MEXT I 
<CD> 1616 DATA 18,3,3,246,163,169,247,3, 
11,1,128,224,35,11,1,223,256,17,19,5,120 
, 190, 171 , 221 , 191 , 121 

<EI> 1620 DATA 19,20,1,128,121,19,10,1,2 
5,26,19,12,1,25,26,17,11,1,19,20,21,11,1 

<DA> 1630 POSITION 9,K2S? "PRESS /START/ 

TO PLAY" 
<HI> 1640 POSITION K2,K3ä? "SPIELER EINS 
": POSITION K3,K5:? "STICK EINS" : POSITION 

K3,K6:? "/OPTION/" 
<LC> 1650 POSITION 28,K3:? "PLAYER ZWEI" 
: POSITION 29, K5ü? "COMPUTER" SPOSITIOM 29 
, K6:? "/SELECT^" 

<L«> 1660 POSITION K2,16l? "WEISS" : PÖSIT 
ION K2,18:? "SCORE 2"SP0SITI0N K2,20:? " 
RESERVE 30" 

<AP> 1670 POSITION 32,16:? "SCHWARZ" : POS 
ITION 30, 18s? "SCORE 2" S POSITION 28,20:? 

"RESERUE 30" 
<HN> 1680 POKE 53276,192 

<CM> 1690 FOR X=K6 TÖ K7:FÖR Y=KO TO K7 l 
GRIDtX,Y3=KO:NEXT Y : NEXT X 

<NM> 1700 GRIDCK4,K33~Kl:GRIDCK3,K4a=Kl: 
GRID (K3 , K3> =K2 : GRID CK4 , K4J =K2 
<IH> 1710 PCK13-Kl:PtK2J=K0:5C«K13=:K2:SC 
tK2>=K2:PASS=K0 
<DC> 1720 POKE 5,59,46 
<KP> 1730 REM 

<HB> 1740 FOR I-K0 TO II : POKE 706,PEEKCB 
RITE+IJ :POKE 707,15-PEEK CBRITE+I3 
<flH> 1750 O^USR CMGVE,K2,PMB,5PIM+I»K7,66 
, 23 , K71 : 0=115R CMÖUE , K3 , PMB , 5PIN+77-IKK7 , 1 
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Ö1,20,K73 

<NI> 1760 IF PEEKC53279>=:K3 THEH P tKU =P 

CK13 +K1 :PÖSTTIÖH K3,K5:? PL$ CP CKJL>*K10+K 

I,P CK1J*K1©+K10J 

<HM> 1770 IF PEEKC53279J=KS THEH P CK2) =P 

«K23+Ki.:POSITIOM 21?, K5 : ? PL$ CP «K23*K1©+K 

1 , P IK23 »K10+K10J 

<BL> 1780 XF PCK1J>K2 THEH P (KU =K8 

<DO> 1790 IF PCK2}>K2 THEH P CK23 =K0 

<Jö> 18ÖÖ IF PEEKCS3279J-K6 THEM 1320 

<JB> lÖlO HEHT HGOTO 174Ö 

<HF> 1Ö2Ö POKE 706,14:P0KE 7G7, Kö : 0=U5R t 

MOVE^KZ^PMBjSPIMjß&^Ö^?) i «=USB tMOVE, K3 

, PMB , 5PIN , 181 , 20 , K73 

<PL> 1B30 POSITIOH 3,K2ä? " 

": POSITION K3,K6".? " " : PO 

SITIOM 29,146:? " " 

<GP> 184Ö GOTO 90 



<LC> 1850 REM 

<MO> 1860 O-USHtMOUE.KO.PMÜ.KO.KÖ.KO.KÖ) 

?FÜR I-Kl TO K8 :Z~PEEK «7113 : POKE 711, Z+t 

Z<K83~C2>K83 ; MEKT I 

<IA> 1870 IF SCJKD^SC CK23 THEM POSITIOM 

14,21:? "IT IS ft TIE,"SGOTO 1910 
<EE> 188Ö POSITION 12,21!? "5PIELER",? 
<OE> 1890 IF SCCK13>5CtK23 THEM ? "EIHS 
SIEGT!" 

<0M> 1900 IF SCCK23>SCCK13 THEM 1 "ZWEI 
5IEGT!" 

<KM> 1910 FOR I-KO TO BOOiMEKT I 
<CH> 1928 FOR 1=704 TO 711: FOR J=PEEK CI3 

TO Kö STEP -Kl: POKE I,J:HEKT J:NEKT I 
<0I> 1930 ? CHR5C1253 :POKE 559,KO:GOT0 1 
470 

Ende des Listings 
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Miner 




Insgesamt müssen Sie fünf Minen bewälti- 
gen. Da kommt einem die Übungsmine zu 
Beginn doch sehr gelegen. Sammeln Sie 
hier genügend Erfahrungen, denn schon in 
der zweiten Mine kommt es auf eine sehr 
genaue Sprungtechnik an. Im dritten Level 
ist Ihr ganzes Können auf der Rutsche ge- 
fragt. Erinnerungen aus der Kindheit wer- 



den wachgerüttelt; nutzen Sie Ihre Erfah- 
rungen. In der vierten Mine sind wir dann 
schon bei den Tücken angelangt, wo es kein 
Zurück mehr gibt. Die letzte Station ist 
wirklich die absolute Krönung. Hier schlak- 
kert selbst der Computer-Freak mit den 
Ohren. 
Der Jumping-Miner kann noch zusätzlich 



Punkte sammeln, indem er durch einen ge- 
zielten Sprung genau auf einem Erdhügel 
landet. Zur Belohnung wächst aus dem 
Erdhaufen eine Pflanze. Weitere Extra- 
Punkte können durch Abhängen der Lam- 
pen kassiert werden. Lediglich unter die 
Lampe stellen und nach oben springen, 
dann rattern die Punkte auf der Anzeige. 



100 ' ********************** 
FING- MINER * * (c) 

* ; * W.H.DOELTSCH 

******************** 



* 

1985 
* 



JUM 



* 6108 



110 ! * . * 

WEITERSTADT 3 * * , 

*■ * A.D. HINTERSTEIN 10 
* 

120 ' ********************** 
ETI GTE GERAETE:* * TI- 

* * X-BASIC 
JOYSTICK 1 * 

125 ' ********************** 

BZW 503 BYTES * * 

* * HOECHSTE VORSICHT 

126 1 *BEI DEN DATA-ZEILEN!* 

**************** 

130 CALL CLEAR : s GOTO 670 
140 CALL KEY : : CALL SOUND : : 
:; CALL SPRITE :: CALL COLOR 
HAR : : CALL VCHAR : : CALL DELSPRITE 
150 CALL MOTION :: CALL CHAR :: CALL LOC 
ATE : : CALL PATTERN : : CALL JOYST : : Ml , 
M2,M3,R,X,Y,Z,S,I,II,A,B,TA,ST,SC,NSC,TI 
160 LEV , LIFE , TOTAL , FLAG . A$ , B$ , C$ , D$ , E$ 
170 DATA 0000003E3E7E3E1C.1C3E7E7E7E3COO 
00 , 040408100000040C , 001C7E0610041800 
180 DATA 2020100800002030, 00387E60082018 
00 , 0000007C7C7E7C38 , 387C7E7E7E3C000Q ,D0F 



* BENO 

-99/4A , 
* * 

* 1587 
FREE 

* 

****** 



CALL GCHAR 
: : CALL HC 



365971A101038, , , 

190 DATA 00404202000074ÜE,00183C7EOOOOOO 

00 , 0000003C3C7E3C3C , 3C7E7E7E7E3C0000 

200 DATA 04041C0000001236, 20203800000048 

6C, .0002424000002E70 

210 DATA 040870O0000Ü43Cl,20100EO0OO0QC2 

83 

220 DATA 33,OOFFFFOOOOFFFFOO,88,0103070F 

1F3F7FFF , 89 , 80C0E0F0F8FCFEFF 

230 DATA 91,FFFEFCF8F0E0C080,92,FF7F3F1F 

0F070301 , 35 , 40C0C04O4OC0C040 , 36 , 02030302 

02030302 , 37 , 0000000000003CFF 

240 DATA 118,103838387CFE7C00 

250 DATA 370,392,440,370,294,370,440,370 

,294,370,2,440,2,587,2,587 

260 DATA 554,494,440,370,294,370,440,370 

, 294 , 370 ,2.392,2, 330 , 2 , 330 

270 DATA 370.392.440,370,294,370,440,370 

,294,370,2,440,2,587,2,587 

280 DATA 659,784,740,880,740,587,659,784 

.659,554,2,587,2,587,2,587,99 

290 DATA 294,440,370,440,294,440,370,440 

, 587 , 440 , 740 , 440 . 659 , 440 , 740 , 440 

300 DATA 784,440,740,440,659,587,554,587 

,659,587,554,494,440,392,370,330 

310 DATA 294,440,370.440,294,440,370,440 

, 587 , 440 , 740 , 440 , 659 , 440 , 740 , 440 

320 DATA 784,440,740,440,659,587.554,494 

,554,587,659,784,740,587,2,587,99 

330 DATA "((((((((<(((((((<(((({({<{<* 

$!#v $!# v $!# v Z $!# $!# 
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$! # Z $!#% $!# % $!# % 

340 DATA "(((((( ( ( ( ( { (((<(,{{((((,!# 
. XZ[ XZ!# 
XZ[ XZ[!# v v XZ[ 
( " 
350 DATA "!# XZt \ZY! # 

% % XZ[% * \Z({{((( ((.( 

((((( .((((((* v $!# \ZY v $!# 

Z" 
360 DATA " $!# \ZY $!# Z 

$!# % \ZY % $!# *Z ((((((<(( (( 
(((((((((<(<(, v v $!# v 
XZ" 

370 DATA " $!# XZE- 

% % $!# % % XZ[ <((((((({((((( 

((((((((((((((" 

380 DATA 5,2,40,5,31,40,6,31,90,7,31,90, 
8,31,90,9,2,40,9,31,40,10,2,36,10,31,91, 
11,2,36,12,2,36 

390 DATA 13,2,36,14,2,36.14,31,89.15,2.4 
0,15,31,40,16,31,90,17,31/90,18,31,90,19 
,31,40,20,31,91 

400 DATA 23,2,40,23,31,40,138,3500 
410 DATA "(((((( ((((({(( (((,($! 

# v v $!# XZ[$!# ( ( 
$!# XZt $!# ( ( % $!# XZ[ 

420 DATA "$!# (< , ( ( $!# ((.('$! 

# V XZE ( $!# vXZt $!# XZt 
$!# XZt $!# % XZt % $!# XZt 

430 DATA "$!# (.(((((((((.((((*(((({{$! 

# \ZY v XZt v ZZ $!# \ZY 
XZt ZZ $!# ( \Ti% XZt ZZ ( 

(" 
440 DATA "$!# ((.(((((( ( { ZZ ( $! 

# XZt v ZZ { $!# XZt v % 
% ZZ ($!# XZt ( ( ZZ 

( " 

450 DATA "$!# XZ[ ( ( ZZ ( $! 

# XZ[ % ( % ( ZZ ( %((((((((((({(( 

460 DATA 5,2.40,5,31,40.13.31,40,18,31,4 

0,23,2,40,23,31,40,116,4100 

470 DATA "((.(((( (((,((( ((((,((((( 

\ZY XZ[ XZ[v$i# \ZY XZ[ 

XZ [ $ ! # . ( ( ( ( , ( XZ [ % $ 
! #" 
480 DATA " \ZY XZ [ XZ t ( ( { ( f 

\ZY %XZ[ XZt $!# ,(((((,( 

XZ[ $!# XZ[ XZ[ XZE % $!# 
%" 
490 DATA "% XZt %XZ [ XZ [ (( ((((((( 
(((((((( XZ[ v $!# XZ 

t ( $!# % XZt ( %$ 

!#" 

500 DATA " ( ( ( ( XZt ( <((((% 
XZt % $!# ( (( XZt 

<(((( $*# % XZ[ (( ( v ((( 

((" 
510 DATA " (( XZt $!# 

*XZ[ % % $!#(((((((((((((( 

((((((((( (((((" 



520 DATA 5,2,40.5,31,40,9,31,40,14,2,40, 

13.31.40,17,31,40,20,2,40,20,31,40,23,2, 

40,23,31,40.129,4700 

530 DATA "(( (*(((((((((((((*( (((,(((!# 

ZZ $!# ZZ XZ [$!!#% ZZ % $! 

# ZZ XZ[v$! (<((,(( ( ((( ZZ XZt 

$! " 

540 DATA " XZ[v v $!# ZZXZ E %$!v 

XZE $!#*((((((((( XZ[ % % (( 

( ( v XZt ( C $i# 

ii 

550 DATA "( ( ( ( ($!#(((( % v 
((( % { ( % ( $! 
( % % ( $!# ( (( 



( ( % ((( % ( XZ 
$!# < % (XZt ( ( $! 
* ( v % % <(<%%( Z 



* 

(," 

560 DATA ' 

v ( 
# ( 
Z " 

570 DATA " ({($!#(( ZZ % 
% Sfe$!# . * ZZ ((((((< ((((((( 

580 DATA 5,2,40,5,31,40,6,2,36,6,31,35,7 

, 2 , 36 , 7 , 31 , 35 , 8 , 2 , 40 , 8 , 31 , 35 , 9 , 31 , 35 , 10 , 

31,40 

590 DATA 13,2,40,16,31,40,17,31,91,19,2, 

40 , 23 , 2 , 40 , 23 , 31 , 40 , 134 , 4800 

600 DATA " (*(( ((((((.((( 

( ZZv \ZY ( ( ZZ 
% \ZY ( ( ZZ * (<( ( \ZY 



610 DATA " ( ((((( 

v ( ( ( \ZY ( 

V \ZY ((( v 
ii 

620 DATA " ( { ( ( % 
v$!# v( ( (ZZv ( 
( ZZ $!# % 



\ZY v ( 
( ( 
% (*( 

( ZZ ( 
$!# ( 
% v ZZ 

630 DATA " (.{(((%*((((((*( (((, 
\ZY (ZZ $!# ZZ % ( XZ ( \ZY( ZZ $! 
# ZZ { ( XZE (\ZY ZZ $!# ZZ (XZ 
E " 

640 DATA '" ( \ZY ZZ $!# ZZ (( XZt 
% \ZYZZ $!# ZZ XZt % (((((((((((((( 
((((((((((((((" 

650 DATA 7,31,40,12,2,40,17.31,40,18,2,4 
0,18,31,91,22,2,40,23,2,40,23,31,40,119, 
4900 

660 !@P- 

670 FOR 1=96 TO 117 : : READ A$ :: CALL C 
HAR(I,A$):: NEXT I :: FOR 1=1 TO 9 :: RE 
AD Z,AI :: CALL CHÄR(Z,A$):: NEXT I 
680 A$="FFFF0FF0QFF00FF0" :: B$="FFFFFFF 
FFFFFFFFF 1 ' 

690 CALL CHÄR(40,A$,41.B$,42,Ä$,43,B$,44 
.A$,45,B$,'46,A$,47,B$,90,B$) 
700 CALL COLOR (1,5, 1,3, 16, 1,4, 16, 1,5, 16, - 
1.6,16,1,7.16,1,8,14,2,2,11,2,10,9,1,11, 
15,2) 
710 LIFE=3 : : LEV=1 : : SC=0 : : GOTO 770 



720 


RESTORE 


330 : 


: 11=23 : 


: RETURN 


730 


RE STORE 


410 : 


: 11=6 :: 


RETURN 


740 


RESTORE 


470 : 


: 11=10 : 


: RETURN 
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750 RESTORE 530 
760 RE STORE 600 
770 GOSUB 1390 : 
720,730,740,750 
IZE(15) : "SCORE: 
SIZE(IO) :"TIME 



: 11=16 : : RETURN 
: I I -8 : : RETURN 
FLAG=0 : : ON LEV GOSUB 
760 : : DISPLAY AT(1,1)S 
;SC :-: DISPLAY AT (1,18) 
0000" 



780 READ A$,B$,C$,D$,£$ :; DISPLAY AT(5, 

1) :A$&B$:C$SJ)$:E$ :: FOR 1=1 TO II :: RE 

AD X,Y,Z :: CALL HCHAR(X, Y, Z) : : NEXT I : 

: READ TOTAL : : READ TI 

790 Z=161 :: S-128 :; CALL DELSPRITE CALL 

) : : Ml,M2,M3-0 

800 CALL SPRITE(#1,98,16,Z+8,S,#2,99,5,Z 

, S , #3 , 96 , 1 , Z , S , #4 , 97 , 1 3 , Z+8 , S) 

810 CALL KEY (1, TA, ST) : : IF TA=18 THEN GO 

SUB 1350 

820 TI-TI-2 :: DISPLAY AT(1,23):TI :: IF 

TK-0 THEN GOTO 1090 
830 CALL JOYST(l,X,Y) : : R= ( { X+3*Y) /4) +5 
: : ON R GOTO 830,870,830,840,810,850,830 
,860,830 
840 Ml=98 : : IF M3=M1 THEN GOTO 890 ELSE 

CALL PATTERN (#1, Ml ,#2, 99, #3, 96, #4, 97)": : 

M2-112 : : GOTO 890 
850 Ml-100 : : IF M3=M1 THEN GOTO 890 ELS 
E CALL PATTERN(#1.M1,#2,1Q1,#3,102,#4,10 
3) : : M2=113 : : GOTO 890 
860 CALL GCHAR( Z/8+2, S/8+1,1) : : IF I<>33 

AND IO40 AND I<>41 THEN GOTO 830 ELSE 
GOTO 880 
870 CALL GCHAR(Z/8+4, S/8+1. I) : : IF I<>33 

AND IO40 AND K>41 THEN GOTO 830 
880 Ml* 108 : : IF M3=M1 THEN GOTO 890 ELS 
E CALL PATTERN(#1,M1,#2,109,#3,110,#4,11 
1) : : M2=115 : : GOTO 690 

890 Y— Y :: CALL KEY( 1 ,TA,ST) : : IF TAOl 
8 THEN 980 

900 IF R=4 THEN Ml=116 : : CALL PATTERN {# 
1, Ml) ELSE Ml-117 :: CALL PATTERN ( #1 , Ml) 
910 CALL SOUND(60,-6,5) : : FOR B=l TO 3 : 
: A=X+S :: IF ( A< 8) + ( A>240) THEN M3=M2 :: 

CALL PATTERN (#1,M2) : : GOTO 1110 
920 S=X+S :: Z=Z-4 :: CALL L0CATE{#1 , Z+8 
,S,#2,Z,S,#3,Z,S,#4,Z+8,S) : : TI-TI-2 :: 
IF B=2 THEN GOTO 1140 
930 NEXT B 
940 FOR B=l TO 7 
>240)THEN M3=M2 

GOTO 1110 
950 Z=Z+4 .: : S=X+S :: CALL L0CATE(#l.Z+8 
,S,#2,Z,S,#3,Z,S,#4 J Z+8,S) : : TI-TI-2 :: 
ON B GOTO 1170,960,1170,960,1170,960,117 


960 NEXT B :: CALL PATTERN < #1 ,M2) 
970 GOTO 1060 

980 S=X+S :: Z=Y+Z :: IF S<8 OR S>240 TH 
EN GOTO 990 ELSE 1000 

990 IF S<8 THEN S=8 :: GOTO 830 ELSE IF 
S>240 THEN S=240 : : GOTO 830 
1000 CALL LOCATE(#l,Z+8,S,#2,Z,S,#3,Z,S, 
#4,Z+8,S):: CALL PATTERN (#1 ,M2) 
1010 CALL SOUND(l,-6,8) : : TI-TI-10 t: DI 
SPLAY AT(1,23) :TI :: IF TI<=0 THEN GOTO 
1090 



A=X+S : : IF <A<8)+(A 
CALL PATTERN < #1, M2) : : 



1020 S=X+S :: Z=Y+Z :: CALL LOCATE (#1,Z+ 

8 , S , #2 , Z , S , #3 , Z , S , #4 , Z+8 , S) : : CALL SOUND 

(1,-7,12):: CALL PATTERN (#1 , Ml ): : M3=M1 

: : GOTO 1110 

1030 FOR 1=1 TO 4 : : Z=Z+8 :: CALL LOCÄT 

E(#1,Z+8,S,#2,Z,S,#3,Z,S,#4,Z+8,S) : : CAL 

L GCHAR(Z/8+3, S/8+1, A) 

1040 IF A>47 THEN GOTO 1050 ELSE ON A-31 

GOTO 1050,1050,1050,1050,1050,1050,1050 
,1050,1130,830,1190,1190,1210,1210,1270, 
1270 

1050 NEXT I 

1060 FOR 1=1 TO 20 :: Z=Z+8 :: CALL LOCA 
TE(#1,Z+8,S,#2,Z,S,#3,Z,S,#4,Z+8,S) : : CA 
LL GCHAR (Z/8+3, S/8+1, A) 
1070 IF A=40 OR A=41 THEN GOTO 1090 
1080 NEXT I 

1090 DISPLAY AT (1,23):" 0000" :: CALL MO 
TION (#1,-3,1, #2, -3,-1, #3, -2, 2, #4, -2, -2) : 
: CALL SOUND (3000,-7, 15) : * FOR X-l TO 50 
:: NEXT X :: CALL DELSPRITE (ALL) 
1100 LIFE=LIFE-1 :: TOTAL, TI=0 :: IF LIF 
E=0 THEN GOTO 1480 ELSE GOTO 770 
1110 CALL GCHAR (Z/8+3, S/8+1,1) 
1120 IF I >47 THEN GOTO 1030 ELSE ON 1-31 

GOTO 1 030 , 830, 830 , 1030 , 1030 , 830 , 830 , 830 
,1130,830,1190,1190,1220,1220,1270,1270 
1130 CALL HCHAR (Z/8+3, S/8+1, 41) : : SC=SC+ 
5 : : GOSUB 1340 : : GOTO 830 
1140 CALL GCHAR(Z/8+2, S/8+1, R) : : CALL GC 
HAR( Z/8+3, S/8+1,1) : : IF R=37 THEN GOTO 1 
160 ELSE M3=M1 :: CALL PATTERN ( #1 ,M2) 
1150 IF I>47 THEN GOTO 930 ELSE ON 1-31 
GOTO 930,930,930,930,930,930,930,930,113 
0,830,1190,1190,1220,1220,1270,1270 
1160 M3*=M1 :: CALL PATTERN(#1 ,M2) : : CALL 

SOUND (100, 880, 5, 1108, 7, 1318,9) : : SC=SC+ 
100 :: DISPLAY AT( 1 , 8) SIZE ( 10) - SC :: CAL 
L HCHAR (Z/8+2, S/8+1, 104) : : GOTO 1110 
1170 CALL GCHAR ( Z/8+2, S/6+1, R) ; : CALL GC 
HARfZ/8+3, S/8+1, I) : : IF R=37 THEN GOTO 1 
160 ELSE M3=M1 :: CALL PATTERN ( #1 .M2) 
1180 IF I>47 THEN GOTO 960 ELSE ON 1-31 
GOTO 960,960,960,960,960,960,960,960,113 
0,830,1190, 1190,1220,1220,1270, 1270 
1190 CALL PATTERN(#1,108,#2,109,#3, 110, # 
4,111):: IF 1=42 THEN CALL HCHAR(Z/8+3, S 
/8+l,43) : : GOSUB 1340 

1200 Z=Z+8 :: CALL LOCATE (#1 , Z+8, S, #2 , Z, 
S,#3,Z,S,#4,Z+8,S) : : CALL SOUND (-200 , 100 
0+Z,l) 
1210 CALL GCHAR (Z/8+3, S/8+1, I) : : IF 1=90 

THEN GOTO 1200 ELSE M3=0 :: GOTO 1120 
1220 CALL PATTERN(#1,116,#2,99,#3,96,#4. 
97) :: IF 1=44 THEN CALL HCHAR ( Z/8+3 , S/8+ 
1,45) : : GOSUB 1340 

1230 Z=Z+8 :: CALL LOCATE (#1 , Z+8 , S, #2 , Z, 
S,#3,Z,S,#4,Z+8,S) : : CALL SOUND (-200 , 100 
0+Z, 1) 
1240 CALL GCHAR (Z/*8 + 3, S/8+1,1) : : IF 1=90 

THEN S-S-8 : : GOTO 1230 
1250 CALL PATTERN (#1,98) :: IF FLAG=1 THE 
N M3=0 :: GOTO 1110 ELSE CALL GCHAR(Z/8+ 
3,S/8,R):: IF R<>32 THEN M3=0 :: GOTO 11 
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1260 CALL HCHAR(Z/8+3, S/8+2,45) : : FLAG=1 

: i GOSUB 1340 : : GOTO 1120 
1270 CALL PATTERN (#1,117, #2, 101, #3, 102, # 
4,103):: IF 1=46 THEN CALL HCHAH(Z/8+3,S 
/8+l,47) : : GOSUB 1340 

1280 Z=Z+8 :: CALL L0CATE{#1 , Z+8,S,#2,Z, 
S,#3,Z,S,#4.Z,S) : : CALL SOUND (-200, 1000+ 
Z, 1) 
1290 CALL GCHAR{Z/8+3, S/8+1.1) : : IF 1=92 

THEN S-S+8 : : GOTO 1280 ELSE CALL PATTE 
RN(#1,100):: M3=0 :: GOTO 1120 
1300 SC=SC+TI :: DISPLAY AT(1,8) SIZE(IO) 
:SC :: TI=0 :: DISPLAY AT( 1 . 18) SIZE(IO) : 
"TIME: 0000" :: RESTORE 290 
1310 READ A : : IF A=99 THEN GOTO 1330 EL 
SE IF A<110 THEN READ I ELSE I=A s: A=l 
1320 CALL SOUND ( INT ( 150* A) ,1,1,1+4, 1,1+8 
,1) : : GOTO 1310 

1330 CALL DELSPRITE( ALL) : : LEV=LEV+1 : : 
IF LEV>5 THEN GOTO 1480 ELSE 770 
1340 DISPLAY AT(1 ,8) SIZE( 10) : SC :: TOTAL 
=TOTAL-l :: IF TOTAL-0 THEN GOTO 1300 EL 
SE RETURN 

1350 FOR 1=1 TO 2 :: 2=Z-4 :: CALL LOCAT 
E(#1,Z+8,S,#2,Z.S.#3,Z,S.#4.Z+8,S) : 1 NEX 
T I 

1360 CALL GCHAR(Z/8+l. S/8+1. II) : : IF II< 
>118 THEN GOTO 1380 ELSE CALL SOUND (100, 
329,1,391,1,466,1):: SC=SC+50 :: DISPLAY 

AT(1,8)SIZE(9) :SC 
1370 CALL SPRITE(#6,118,13,Z,S,22,0) : : C 
ALL HCHAR( Z/8+1, S/8+1, 32} 

1380 FOR 1=1 TO 2 :: Z=Z+4 :: CALL LOCAT 
E(#1,Z+8,S,#2,Z,S,#3,Z,S,#4,Z+8,S) : : NEX 
T I :: CALL DELSPRITE (#6) : : RETURN 
1390 CALL CLEAR :: CALL SCREEN(5):: DISP 
LAY AT(4,3) : " J U M P I N G M I N E R" : » 
:"h h h h h h h h h h h h h h": : : : M 



1985 VON WILLI DOELTSCH" 

1400 DISPLAY AT(15,4} : "PREP ARE FOR STATI 

ON";LEV :: DISPLAY AT(20 ,6) :LIFE; " CHANC 

E LEFT" 

1410 IF SOO THEN GOTO 1460 

1420 RESTORE 250 

1430 READ I : : IF 1=99 THEN GOTO 1420 EL 

SE IF K110 THEN READ II ELSE II-I t: I- 

1 

1440 CALL SOUND (INT( 200*1) ,11.0,11+3,0,1 

1+6,0) 

1450 CALL KEY(1,TA.ST) : : IF TA<>18 THEN 

GOTO 1430 

1460 FOR 1=1 TO 3 : : CALL SCREEN{13):: C 

ALL SOUND (-1500, 880, 1,440, 18,884,20) : : F 

OR A=l TO 200 : : NEXT A 

1470 CALL SCREEN(12):: CALL SOUND(-1500, 

110,1,220.18,111,25):: FOR A=l TO 200 :: 

NEXT A : : NEXT I : : CALL CLEAR : : CALL 
SCREEN(2) : : RETURN 

1480 IF SC<-NSC THEN GOTO 1490 ELSE NSC= 
SC 

1490 CALL CLEAR :: DISPLAY AT(9 , 7) : "HIGH 
SCORE =" ;NSC :: DISPLAY AT ( 13, 7) : "SCORE 

= ";SC 
1500 DISPLAY AT(22.1) : "FUER NEUES SPIEL 
ODER ENDE": : "BITTE DIE TASTEN J ODER N" 

: : SC, TOTAL. LIFE, TI=0 
1510 RESTORE 290 

1520 READ I : : IF 1=99 THEN GOTO 1510 EL 
SE IF K110 THEN READ II ELSE 1 1 = 1 :: I- 
1 

1530 CALL SOUND ( INT (120*1) .II .0,11+3,0,1 
1+6,0) 

1540 CALL KEY (3, TA, ST) : : IF TA=74 THEN G 
OTO 710 ELSE IF TÄ=78 THEN CALL CLEAR : : 

END ELSE GOTO 1520 

Ende des Listings 
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Alles Gute kommt von oben!?! 

Stutzen Sie den Fallschirmspringern die Flügel! 




Ein absolutes Knüllerspiel auf dem Apple 
in Maschinensprache! Ein Ballerspiel vom 
Feinsten! Jeder Schuß ein Treffer - oder 
auch nicht. Sie können sich zu Beginn ent- 
scheiden, ob Sie Ihre Geschosse steuern 
wollen oder nicht. Entschließen Sie sich, 
die Kügelchen zu steuern, da Sie dann die 
Hubschrauber mit Ihren Geschossen jagen 
können. 

Die eigentliche Gefahr geht jedoch von den 
Fallschirmspringern aus. Sobald links oder 
rechts von der Kanone vier von den Faltern 
den Boden erreicht haben, wird Ihr Feuer- 
stützpunkt in die Luft gesprengt. Von den 
Hubschraubern selbst geht keine Gefahr 

Homputronic 



aus. Allerdings bringen diese mehr Punkte 
als die Jäger am Schirm. Natürlich müssen 
Sie auch Opfer bringen, um zu Punkten zu 
gelangen. Jeder Schuß kostet Sie einen 
Punkt. Bei Dauerfeuer können Sie sich ja 
ausrechnen, wieviel Ihnen übrig bleiben 
(null). Nehmen Sie sich unbedingt vor den 
Männchen in Acht, die versuchen, auf Ihrer 
Plattform zu landen. Wenn ihnen das ge- 
lingt, sind Sie ebenfalls hinüber. Die dritte 
(und damit letzte) Todesform sind Bom- 
ben, die in einem Zwischenlevel von Star- 
Fightern auf Sie geworfen werden. Bis zu 
diesem Zeitpunkt sollten Sie schon ein 
paar Punkte unter Dach und Fach gebracht 



haben, da diese Bomben unbedingt getrof- 
fen werden müssen. Dazu empfiehlt sich 
Dauerfeuer! 

Begeben Sie sich nun auf die High-Score- 
Jagd bei Enemy-Attack! 
Zur Eingabe von Enemy-Attack: 
Mit CALL-151 in den Monitor gehen. 
Dann das Listing von 1D 1F-552F eingeben. 
Danach mit CTRL-Cxmd Return den Mo- 
nitor verlassen und das Programm mit 
BSAVE ENEMY-ATTACK,A$1D1F,L$3810 
abspeichern und mit BRUN ENEMY-AT- 
TA CK starten. 



Das Listing 
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1D1F- 
1D20- 
1D28- 
1D30- 
1D38- 
1D40- 
1D48- 
1D50- 
1D5S- 
1D60- 
1D6B- 
1D70- 
1D7B- 
1D80- 
1DB8- 
1D90- 
1D9B- 
1DA0- 
1DA8- 
1DE0- 
1DB8- 
1DC0- 
1DC8- 
1DD0- 
1DD8- 
1DE0- 
1DE8- 
1DF0- 
1DFB- 



0S A9 
69 92 
F0 0F 
85 00 
E2 18 
4C SA 
DB FA 
85 78 
A2 40 
F9 C6 
EE 63 
AD 61 
42 8E 
F3 03 
BD F9 
03 8E 
FF 03 
F4 03 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 



01 A9 78 
34 A0 07 
91 00 88 
48 A5 00 
68 90 E6 
90 04 FF 
1D 50 9D 
A9 5F 85 
A0 00 84 
Bl 78 91 
79 C6 70 
42 A2 20 
42 AE 62 
Fl 03 8D 
SD F6 03 
03 BE FA 
FD 03 BD 
AD F3 03 
4C BC 42 
00 00 00 
00 00 00 
00 00 00 
00 00 00 

00 00 00 

00 00 00 

00 00 00 

00 00 00 

00 00 00 



85 00 
49 65 
10 F6 
IS 69 
E6 01 



1D 
00 



IE 

1D 



79 A9 
7B 84 
7A CB 
CA D0 
BE F0 
42 4C 
F2 03 
BE F7 
03 BD 
FE 03 
49 A5 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 



A2 
18 
CA 
80 
B0 
1D 
CA 
7F 
7A 
D0 
F2 
42 
BC 
BE 
03 
FC 
BE 
BD 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 



1E00- 


4C 


05 


IE 


3C 


IE A0 


D0 


AD 


2020- 


AD EC 42 BD E7 


42 AD EB 


1E0B- 


03 


IE 


85 


00 


AD 04 


IE 


85 


2028- 


42 BD E6 42 20 


8C 6D AD 


1E10- 


01 


A2 


00 


BD 


27 IE 


E8 


E0 


2030- 


51 C0 AD 54 C0 


A0 00 A2 


1E18- 


14 


D0 


02 


A2 


00 51 


00 


91 


2038- 


00 CA D0 FD BB 


D0 FA A2 


1E20- 


00 


88 


D0 


EF 


4C 3C 


IE 


A0 


2040- 


00 BE 10 C0 AD 


00 C0 10 


1E28- 


Cl 


A0 


C7 


Cl 


CD CS 


A0 


A0 


2048- 


FB A2 00 8E 10 


C0 8E AD 


1E30- 


D6 


CF 


CE 


Cl 


AE A0 


CB 


D2 


2050- 


60 C9 CE F0 07 


C9 D9 D0 


1E38- 


Cl 


D5 


D3 


D3 


A9 CF 


F9 


90 


2858- 


EB EE AD 60 20 


EC SC AD 


1E40- 


10 


Bl 


24 


28 


1F 64 


C4 


59 


2060- 


50 C0 AD 52 C0 


AD 57 CB 


1E48- 


27 


6E 


7A 


A0 


48 22 


7E 


65 


2068- 


AD 54 C0 A9 IE 


8D D7 42 


1E50- 


CE 


42 


SC 


0F 


19 59 


00 


74 


2070- 


A9 IE 8D D6 42 


A9 04 BD 


1E58- 


88 


CD 


78 


F4 


B6 60 


76 


8E 


2078- 


EA 42 BD El 42 


A9 00 BD 


1E60- 


35 


CF 


C9 


61 


E3 CF 


61 


4B 


2080- 


DB 42 BD EF 42 


BD D9 42 


1E6B- 


19 


B4 


00 


C3 


25 3F 


DB 


4C 


208B- 


BD DA 42 BD E2 


42 BD E3 


1E70- 


9B 


F9 


31 


BE 


68 E3 


C9 


A4 


2090- 


42 BD E0 42 SD 


DE 42 BD 


1E7S- 


66 


62 


9C 


BS 


20 42 


B7 


4B 


2098- 


DF 42 20 12 42 


9D DC 42 


1E80- 


78 


20 


78 


5C 


13 70 


D2 


2D 


20A0- 


EE DE 42 20 07 


42 20 12 


1E88- 


31 


79 


60 


CE 


43 23 


06 


11 


20AB- 


42 9D DC 42 20 


07 42 A2 


1E90- 


B9 


3C 


59 


74 


01 5C 


48 


25 


20B0- 


FF 4C DD 40 AD 


D9 42 F0 


1E98- 


64 


70 


DF 


2D 


28 79 


60 


CC 


20BB- 


06 CE D9 42 4C 


2A 41 AD 


1EA0- 


43 


24 


06 


18 


51 18 


IE 


E3 


20C0- 


DA 42 F0 2C AD 


DB 42 D0 


1EA8- 


AB 


70 


75 


DA 


73 DC 


6A 


53 


20C8- 


61 A9 64 8D D9 


42 A9 00 


1EB0- 


DB 


17 


C9 


5D 


IE CB 


39 


68 


20D0- 


BD EF 42 BD DA 


42 AE E0 


1EB8- 


4C 


Dl 


09 


D5 


11 01 


DB 


4D 


20D8- 


42 E0 05 F0 4D 


EB BE E0 


1EC0- 


D0 


D9 


4B 


70 


C6 82 


CA 


CC 


20E0- 


42 BD DB 42 BD 


0D 44 BD 


1EC8- 


46 


83 


0D 


A6 


19 Bl 


00 


93 


20E8- 
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4CE0- 04 08 08 08 08 0C 0C 0C 


! 48A8- 43 C9 04 B0 3F A8 3B AD 


4ACB- 60 BD CE 6B 4C 


D2 6A BD 


4CE8- 01 01 02 03 04 05 06 07 


48B0- 25 69 FD 46 43 C9 0A 80 


4AD0- CF 6B 85 7C A5 


7F F0 44 


4CF0- 03 09 0A 0B 0C 0D 0£ 0F 


| 4BB8- 33 0A 0A 84 74 65 74 8D 


4 ADS- A9 01 85 81 86 


7A 84 7B 


4CF8- 08 08 08 08 00 00 08 08 
4D00- 08 0A 0A 0A 0C 0D 0E 0F 


; 48C0- 27 69 BC 48 43 B9 18 64 


4AE0- A2 00 BC FS 42 


F0 28 BC 


! 4BCB- BC 45 43 18 79 1F 64 85 


4AES- F8 42 C4 77 D0 


21 BC F6 


4D08- 08 08 03 08 08 08 08 08 


48D0- 74 B9 20 64 85 75 90 02 


4AF0- 42 B9 DE 4E C5 


7B D0 17 


4D10- 01 02 03 04 05 06 07 08 


48D8- E6 75 AC 27 69 Bl 74 2D 


4AFS- B9 F6 4F 25 7C 


F0 10 A9 


4D18- 01 01 04 07 0A 01 01 04 


48E0- 23 69 F0 08 A9 00 9D 49 


4B00- 00 9D 1D 43 A6 


76 9D 51 


4D20- 07 0A 01 01 04 07 0A 0A 


48E8- 43 4C FB 68 AD 26 69 18 


4B0B- 6B 20 1D 6B 4C 


18 6B 8A 


4D28- 01 01 02 02 02 02 03 03 


''■ 48F0- 69 0A AA C9 28 90 9E 60 


4B10- 18 69 05 AA E0 


23 90 CA 


4D30- 03 03 02 02 02 02 01 01 


\ 48F8- A9 02 48 BD 47 43 48 BD 


4B18- A4 7B A6 7A 60 


20 2F 6B 


4D3B- 01 06 0A 04 0F 0C 07 0E 


i 4900- 4B 43 48 BD 46 43 48 BD 


4B20- A9 06 SD D5 6C 


A9 19 A2 


4D40- 02 03 08 05 0B 0D 07 01 


■ 4908- 4D 43 48 BD 4E 43 48 20 


4B28- 00 8E D6 6C 4C 


B8 5B A9 


4D4B- 0F 0D 0B 09 07 05 03 01 


\ 4910- 0E 51 A9 08 BD D5 6C A9 


4B30- 03 48 BD 55 6B 


48 BD 53 


4D50- 01 03 05 07 09 0B 0D 0F 


] 4918- 05 A2 00 BE D6 6C 20 BS 


4B3B- 6B 18 69 03 48 


BD 57 6B 


4D58- 0F 0F 0F 0F 0A 0A 0A 0A 


[ 4920- 5B 18 60 00 00 00 00 00 


4B40- 48 A9 00 48 48 


20 0E 51 


4D60- 0D 0D 0D 0D 08 08 08 08 


[ 4928- AD DA 42 F0 0A AD D9 42 


4B48- 60 00 00 00 00 


00 00 00 


4D6B- 01 01 00 04 04 00 01 01 


1 4930- D0 05 AD DB 42 D0 01 60 


4B50- 00 00 00 00 


00 00 00 


4D70- 01 00 02 02 00 01 01 00 


\ 4938- A2 02 CA 30 73 BD 51 6B 


4B58- 00 00 00 03 02 


03 03 03 


4D78- D8 6C E8 6C F8 6C 0B 6D 


' 4740- 1D 49 6B D0 F5 86 76 A0 


4B60- 03 02 03 02 03 -02 02 03 


4D80- 18 6D 28 6D 38 6D 48 6D 


\ 474B- 00 B9 45 43 F0 5E B9 4D 


4B6S- 02 02 02 02 02 


02 02 01 


4D8B- 58 6D 68 6D A2 2E BD A3 


4950- 43 30 0F B9 47 43 C9 04 


4B70- 02 02 01 02 01 


02 01 01 


4D90- 71 85 76 BD A4 71 85 77 


4958- 90 52 C9 08 B0 4E 69 03 


4B78- 01 01 02 01 00 


01 01 01 


4D98- A9 A0 A0 27 91 76 B8 10 


4960- 90 OD B9 47 43 C9 IC 90 


4B80- 01 00 01 00 01 


00 00 01 


4DA0- FB CA CA 10 E9 A2 06 A0 


4968- 43 C9 20 B0 3F E9 00 A6 


4B8B- 00 00 00 00 00 


00 00 00 


4DAB- 00 20 66 71 2A 2A 2A 2A 


4970- 76 9D 55 6B 1B 69 08 85 


4B90- 00 01 01 01 01 


01 02 01 


4DB0- 2A 2A 2A A0 CS CE C5 CD 


4978- 78 38 E9 0D 85 77 B9 46 


4B9B- 02 02 01 02 02 


02 02 03 


4DB8- D9 AD Cl D4 D4 Cl C3 CB 


4980- 43 CD 77 62 D0 30 A2 00 


4BA0- 02 02 03 02 03 


03 03 03 


4DC0- A0 2A* 2A 2A 2A 2A 2A 2A 


! 4988- 86 74 C4 74 F0 13 BD 46 


4BA8- 03 03 03 03 04 


03 04 03 


4DC8- 00 A2 06 A0 01 20 66 71 


4990- 43 CD 77 62 F0 0B BD 47 


4BB0- 04 04 04 04 04 


04 04 04 


4DD0- 2A 2A 2A A0 Bl B9 B8 B6 


1 4998- 43 CS 77 90 04 C5 78 90 


4BB8- 05 04 05 05 04 


05 05 05 


4DDB- A0 D6 AE A0 Cl CC C5 D8 


" 49A0- 0B 8A 18 69 0A AA E0 28 


4BC0- 05 05 05 05 05 


05 05 00 


4DE0- D3 CF C6 D4 D7 Cl D2 CS 


! 49A8- 90 DE B0 0A 98 18 69 0A 


4BC8- 08 10 18 20 28 


30 BS 80 


4DEB- A0 2A 2A 2A 00 A2 05 A0 


| 49B0- A8 C0 28 90 94 60 A6 76 


4BD0- FC B0 FC 80 B8 


80 F0 80 


4DF0- 03 20 66 71 53 43 4F 52 


49BB- B9 4D 43 9D 51 6B B9 48 


4BD8- FB 81 F8 81 F0 


80 E0 81 


4DF8- 45 3A 00 AD EC 42 85 7D 


j 49C0- 43 9D 53 6B B9 46 43 18 


4BE0- F0 B3 F0 83 E0 


81 C0 83 


4E00- AD EB 42 85 7C 20 31 71 


! 49CB- 69 0B 9D 57 6B A9 00 9D 


4BE8- E0 87 E0 87 C0 


83 80 87 


4E08- A2 15 A0 03 20 66 71 48 


I 49D0- 59 6B CE DB 42 60 A2 00 


4BF0- C0 BF C0 BF 80 


87 80 8E 


4E10- 49 47 48 20 53 43 4F 52 


49D8- 8E D7 6C 86 7F 86 76 A9 


4BF8- B0 9F 80 9F B0 


8E 80 9C 


4E1B- 45 3A 00 AD E7 42 85 7D 


49E0- 00 85 81 BD 49 6B F0 11 


4C00- 80 BE 80 BE 80 


9C A2 00 


4E20- AD E6 42 85 7C 20 31 71 


■ 49E8- BD 4F 6B 85 77 BC 4D 6B 


4C08- 8E EA 42 20 24 


46 AD 5B 


4E28- A2 00 A0 05 20 66 71 C4 


49F0- BD 4B 6B AA 20 87 6A A6 


4C10- 6C D0 08 20 31 


6C A9 01 


4E30- C9 CS A0 Cl D5 C6 C7 Cl 


; 49F8- 76 BD 51 6B 9D 49 6B F0 


4C18- BD SB 6C A9 04 


48 A9 12 


4E38- C2 C5 A0 C4 CS D3 A0 D3 


4A00- 7D E6 7F BD 57 6B 85 77 


4C20- 48 A9 02 48 A9 


A4 48 A9 


4E40- D0 C9 CS CC D3 A0 C9 D3 


4A0B- BC 55 6B BD 53 6B AA 20 


4C28- 00 48 A9 FC 48 


20 0E 51 


4E48- D4 A0 C5 D3 A0 CD CF C5 


4A10- 87 6A EE D7 6C C6 7F A6 


4C30- 60 A2 AE A0 12 


BD 5E 4D 


4E50- C7 CC C9 C3 C8 D3 D4 00 


4A18- 76 BC 59 6B BD 55 6B 9D 


4C38- 85 75 BD IE 4E 


85 74 A9 


4E58- A2 00 A0 06 20 66 71 D6 


; 4A20- 4D 6B BD 51 6B 30 16 BD 


4C40- AA 51 74 91 74 


C8 A9 D5 


4E60- C9 C5 CC C5 A0 DO D5 CE 


; 4A28- 53 6B 9D 4B 6B 18 79 5B 


4C4B- 51 74 91 74 CB 


A9 80 51 


4E68- CB D4 CS A0 DA D5 A0 CS 


1 4A30- 6B C9 07 90 19 E9 07 FE 


4C50- 74 91 74 88 BB 


CA E0 A9 


4E70- D2 D2 CS C9 C3 CB CS CE 


i 4A38- 55 6B 4C 4E 6A BD 53 6B 


4C58- B0 DB 60 00 08 


48 BA 48 


4E7S- AC A0 C2 CS D6 CF D2 A0 


4A40- 9D 4B 6B 38 F9 5B 6B B0 


4C60- 98 4B A9 00 85 


79 A9 08 


4E80- C5 D3 A0 C4 CS CE A0 00 


4A48- 05 69 07 DE 55 6B 9D 53 


4C6B- 85 76 AD D7 6C 


F0 0F AD 


4EBB- A2 00 A0 07 20 66 71 C6 


4A50- 6B FE 59 6B BD 57 6B 9D 


4C70- D5 6C C9 06 F0 


17 A9 05 


4E90- CS C9 CE C4 C5 CE A0 C7 


4A58- 4F 6B 1B 79 91 6B 9D 57 


4C78- 85 79 85 76 DO 


3A AD D5 


4E98- C5 CC C9 CE C7 D4 A0 C4 


4A60- 6B C9 9B 90 19 A4 81 DB 


4C80- 6C 10 0A AD D5 


42 F0 30 


4EA0- C5 C9 CE A0 C7 CS D3 C3 


■ 4A68- 04 C9 AC 90 1,1 A9 00 9D 


4C8B- A9 09 BD D5 6C 


AD D6 6C 


4EA8- CB D5 C5 D4 DA D4 A0 DA 


4A70- 51 6B A6 76 20 2F 6B A9 


4C90- 29 0F AB AD D5 


6C EE D6 


4EB0- D5 A0 DA CS D2 AD A0 00 


i 4A78- FF BD E8 42 A6 76 E8 E0 


4C9B- 6C C0 0F D0 09 


A2 FF 8E 


•4EBB- A2 00 A0 08 20 66 71 D3 


\ 4A80- 02 B0 03 4C DD 69 60 A9 


4CA0- D5 6C E8 8E D6 


6C 0A AA 


4EC0- D4 CF C5 D2 C5 CE AE A0 


i 4A88- 04 85 79 BD C7 6B BS 78 


4CA8- BD 78 6D 85 77 


BD 79 6D 


4EC8- C4 CS C9 CE A0 C7 C5 D3 


| 4A90- A6 77 BD IE 4E 85 7D BD 


4CB0- 85 78 Bl 77 85 


79 85 76 


4ED0- C3 C8 D5 C5 D4 DA A0 D7 


! 4A98- 5E 4D 85 7E E6 77 A6 78 


4CBB- A2 09 A5 79 F0 


03 AD 30 


4ED8- C9 D2 C4 AO DA CS D2 03 
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4EE0- D4 CF CS D2 D4 AC AB 


00 


5100- AE 20 32 00 A2 02 A0 17 


5328- B7 BS 7E C9 00 DB Bl 6B 


4EE8- AZ 00 AB 0? 20 66 71 


D7 


5108- 20 66 71 CC CS CE CB C2 


5328- 18 69 30 4C 9A 71 20 BA 


4EF0- CS CE CE A0 C7 C5 CE 


D5 


5110- Cl D2 CS A0 D3 C3 CB D5 


5330- 71 68 85 7A 68 85 7B E6 


4EF8- C7 A0 C6 Cl CC CC D3 


C3 


5110- CS D3 D3 C5 AS A3 AB A0 


5338- 7A DB B2 E6 7B A0 00 Bl 


4FB0- CB C9 02 CD D3 D0 D2 


C9 


5120- A0 A0 A0 A0 AB A0 AB AB 


5340- 7A F0 88 09 80 20 9A 71 


4F0B- CE C7 C5 D2 A0 C4 C5 


CE 


5128- A0 28 59 2F 4E 29 3F 00 


5348- 4C 6F 71 A5 7B 48 AS 7A 


4F10- A0 C2 CF C4 C5 CE A0 


0B 


5130- 60 A2 00 86 7E AS 7D 4A 


5350- 4B 60 86 78 98 BA A8 B9 


4F1B- A2 00 A0 8A 20 66 71 


CS 


513B- 4A 4A 4A 20 55 71 AS 7D 


5358- A3 71 B5 76 B9 A4 71 85 


4F20- D2 D2 CS C9 C3 CS C5 


CE 


5140- 29 0F 20 55 71 AS 7C 4A 


536B- 77 68 A4 78 89 08 91 76 


4F2B- AC CF C4 CS D2 A0 C4 


C9 


514B- 4A 4A 4A 20 55 71 A5 7C 


5368- E6 78 60 00 04 80 04 08 


4F30- C3 CB A0 CS C9 CE CS 


A0 


5150- 29 0F 4C 60 71 A6 7E D0 


5370- 05 80 05 00 06 80 06 00 


4F38- C2 CF CD C2 C5 A0 D4 


D2 


5158- 07 BS 7E C9 BB DB Bi 6B 


5378- 07 80 07 28 04 AB 04 28 


4F40- C9 C6 C6 D4 AE A0 A0 


00 


5160- 18 69 38 4C 9A 71 2B BA 


5388- 05 AB 05 28 06 AB 06 28 


4F48- A2 00 A0 0B 20 66 71 


C4 


5168- 71 68 BS 7A 69 85 7B E6 


5388- 07 A8 07 50 04 Dß 04 50 


4F50- Cl D3 A0 D3 D0 C9 CS 


CC 


517B- 7A DB 02 E6 7B AB B0 Bl 


5390- 05 D0 BS 50 06 DO 06 SB 


4F58- A0 D7 C9 D2 C4 A0 CD 


C9 


517B- 7A F0 08 09 80 20 9A 71 


5398- 07 DB B7 BB 80 08 47 04 


4F60- D4 A0 D0 Cl C4 C4 CC 


C5 


5 180- 4C 6F 71 AS 7B 48 AS 7A 


53A8- 44 B4 30 B4 0E 04 EC 03 


4F6B- A0 C7 CS D3 D0 C9 CS 


CC 


518B- 48 60 B6 78 99 0A AB B9 


53AS- DA 03 D5 03 BE 03 B9 03 


4F78- D4 AC D7 CF C2 CS C9 


00 


5190- A3 71 85 76 B9 A4 71 BS 


S3B0- 8B 03 SD 83 2F 03 01 03 


4F7S- A2 00 A0 0C 20 66 71 


CB 


51 98- 77 60 A4 78 09 80 91 76 


53BS- D3 02 A5 82 77 02 49 02 


4FB0- CE CF D0 C& BD D3 C3 


CS 


51A8- E6 78 60 BB 04 BB B4 00 


53C0- 3D 02 38 02 13 02 ES 01 


4F88- C9 CS D3 D3 CS CE A0 


D5 


SIAS- ©5 80 SS 00 06 80 06 BB 


53C8- B7 01 89 01 73 01 5D 01 


4F90- CE C4 AS D0 Cl C4 C4 


CC 


SIDS- 07 80 07 28 04 AB 04 28 


53D0- 47 Bl 31 01 1B 01 BS 01 


4F98- CS BD D3 D4 CS D5 CS 


D2 


51BB- BS AB 05 28 06 A3 06 28 


53D8- D4 00 CF 00 CB 00 C3 08 


4FA8- CE AB C7 C9 CC D4 AE 


00 


51CB- ©7 A3 07 53 04 DB S4 50 


53E0-- B4 (80 B3 00 9E 00 9D 00 


4FAS- A2 00 A8 BD 20 66 71 


AD 


51CFJ- 05 D0 ®5 50 86 DB 06 SB 


53E3- 98 00 SD S30 27 00 2A 84 


4FB0- AD AD AD AD AD AD AD 


AD 


5iD^~ 07 DB B7 SB 20 57 49 4C 


53F0- 27 04 0E 04 SB 04 04 00 


4FBS- AD AD AD AD AD AB AD 


AD 


SiDa- 4C 20 4D 4F 56 45 20 20 


53F8- mm Es A6 04 mm 00 02 00 


4FC0- AD AD AD AD AD AD AD 


AD 


51E0- 54 4.8 45 00 A2 00 AS 0E 


5408- FF FD IS EF 93 FF BF 13 


4FC8- AD AD AD AD AD AD AD 


AD 


51E8- 20 66 71 47 55 4E 20 43 


54^8- FF 60 20 12 B3 DF 81 00 


4FD0- AD AD AD AD AD A0 Aß 


AB 


51F0- 4F 55 4E 54 45 52 2D 43 


5410- FE FD mm BF DB FF BF 03 


4F08- AB AB A0 AS AS AB A0 


A0 


51F8- 4C 4F 43 4B 57 49 53 45 


5418- FF 60 20 12 B3 DF 01 80 


4FE8- AB AB AB 00 A2 00 AS 


0E 


5200- 20 41 4E 44 20 20 27 46 


5420- 00 0S 00 08 08 00 00 08 


4FES- 20 66 71 C3 D4 D2 CC 


AD 


5208- 27 20 57 49 4C 4C 20 4D 


5428- 00 00 08 BS 00 00 00 00 


4FF0- D2 CS D3 CS D4 BD D3 


DS 


5210- 4F 56 45 00 A2 00 AB BF 


5430- 00 00 00 00 00 08 00 00 


4FF8- C9 CS CC A0 C2 CS CS 


CE 


5218- 28 66 71 49 CS C9 CE AB 


5438- 00 00 00 00 00 BB 80 00 


5000- C4 CS CE AE AB Aß AB 


AB 


5220- D3 C3 C8 D5 D3 D3 AB CB 


5448- 00 80 00 00 00 00 08 00 


5000- AB AB A0 AB AB A0 AB 


AB 


522S- CF D3 D4 CS D4 AB CS C9 


5443- 00 00 00 00 00 00 08 08 


5010- AS AB AB 06 A2 00 AB 


BF 


5238- CE CS CE AB D0 D5 CE CB 


5450- 80 00 00 00 00 80 00 00 


501B- 20 66 71 A0 A0 A0 AB 


AB 


5238- D4 AE AB AB AB AB A0 AB 


5458- 00 00 00 80 08 00 00 00 


5020- AB A0 AB AB AB AB AB 


AB 


5240- AB A0 AB BS A2 00 AB 1B 


5460- 00 08 BB 00 00 00 00 80 


5028- AB A0 A0 AB AB AB AB 


AB 


5248- 20 66 71 A0 AB AB AB AB 


546S- 00 BB 00 00 00 00 80 BB 


5030- AB A0 AB A0 A0 AB AB 


AB 


. 5250- AB AB AB AB AB AB AB A0 


5470- 80 00 88 00 00 0B 80 00 


S03B- AB A0 AB AB AB AB AB 


AB 


525S- AB A0 AB A0 A8 A0 AB A0 


5478- 08 00 BB 00 80 00 88 00 


5040- AB AB AB 00 A2 00 AB 


1B 


5260- A0 AB AB AB AB AB AB AB 


5438- 00 00 80 00 BB 88 00 BB 


5048- 20 66 71 A0 AB AB AB 


AB 


5268- A0 AB AB AB A0 AB A0 AB 


548S- 0B BB 00 00 80 00 00 00 


5B5B- AB AB AB A0 AB AB A0 


AB 


527B- Aß AB AB 00 A2 BC AB 11 


5498- 00 00 00 80 00 88 0B 80 


5B58- A0 AB AB A0 AB AB AB 


AB 


5278- 20 66 71 54 41 52 47 45 


549S- 00 00 00 00 00 08 00 00 


SB60- AB AB AB AB AB AB AB 


AB 


5280- 54 2B 20 20 20 SB 4F 49 


54A0- 00 00 00 00 00 00 00 BB 


5B6B- A0 A0 AB A0 A0 AB AB 


AB 


5288- 4E 54 S3 BB A2 BC AB 12 


54A8- 08 BB BB 80 00 BB 00 00 


5070- AB A0 AB 00 A2 0C AB 


11 


529B- 20 66 71 3D 3D 3D 3D 3D 


S4B0- 00 00 00 08 00 00 00 00 


507B- 20 66 71 54 41 52 47 


45 


529B- 3D 20 20 20 20 3D 3D 3D 


54BS- 00 00 08 80 BB 80 00 00 


5BB0- 54 20 20 20 20 50 4F 


49 


52A0- 3D 3D 3D 00 A2 0C AB 13 


54C0- 00 00 00 00 08 00 00 00 


50BB- 4E 54 53 00 A2 0C AB 


12 


52AB- 20 66 71 42 4F 4D 42 20 


54CB- 00 BB 00 00 00 00 08 BB 


5090- 20 66 71 3D 3D 3D 3D 


3D 


52B8- 20 20 20 20 20 20 20 20 


54DB- 00 BB 00 08 08 00 BB BB 


S09B- 3D 20 20 20 20 3D 3D 


3D 


52BB- 20 32 35 00 A2 0C AB 14 


54DB- 00 BB 88 00 0B 88 BB 88 


50A0- 3D 3D 3D 00 A2 0C AB 


13 


52C0- 20 66 71 48 45 4C 49 43 


54E0- 00 00 00 00 00 00 00 00 


50AB- 20 66 71 C2 CF CD C2 


C5 


52C8- 4F 50 54 45 52 20 20 20 


54E8- 00 00 00 00 00 08 00 00 


50B0- 20 20 2B 20 20 20 20 


2B 


52D0- 20 20 35 00 A2 0C A0 15 


54F0- 00 08 80 00 00 00 00 08 


5BBB- 20 32 35 00 A2 0C AB 


14 


52D8- 20 66 71 4A 45 54 20 20 


54F8- 00 00 00 80 00 00 BB 88 


5OC0- 20 66 71 48 45 4C 49 


43 


52E0- 20 20 20 20 20 20 20 20 


5508- 00 00 00 08 00 BB BB 00 


50CB- 4F 50 54 45 52 20 20 


20 


52E8- 28 20 35 BB A2 BC AB 16 


5588- 80 08 88 88 88 00 00 00 


50D0- 20 20 35 00 A2 0C A0 


15 


52F0- 20 66 71 50 41 52 41 54 


5510- 00 00 00 00 00 80 00 00 


50DB- 20 66 71 4A 45 54 20 


20 


S2F8- 52 4F 4F 50 45 52 20 28 


55 18-- 00 08 00 00 00 00 08 02 


50E0- 2B 2B 20 20 20 20 20 


20 


5308- 4A 4A 4A 2B 55 71 A5 7D 


5520- A2 00 20 B8 SB A9 00 A6 


50E8- 20 20 35 00 A2 BC A0 


16 


5308- 29 BF 20 55 71 A5 7C 4A 


5528- B8 48 BD 6F 43 48 A9 00 


50F0- 20 66 71 C6 Cl CC CC 


D3 


5310- 4A 4A 4A 20 55 71 A5 7C 




50FB- C3 CB C9 D2 CD D3 D0 


D2 


5318- 29 0F 4C 6B 71 A6 7E DB 
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TI IRBO-PASCAL^ TURBO-PASCAL 



Komfortable Eingabe-Routinen für TURBO-PASCAL 



Als Unterstützung unseres TURBO-PAS- 
CAL-Kurses haben wir uns diesmal drei sehr 
nützliche Utilities ausgedacht. 

Eine große Schwachstelle von Pascal-Sy- 
stemen ist die Eingabe von Real-/ Integer- 
Werten. Insbesondere bei professionellen 
oder umfangreichen Anwendungen, wel- 
che eine abbruchsichere Eingabe verlan- 
gen, sind die vorhandenen PASCAL-PRO- 
CEDUREN nur selten ausreichend. Das 
nachfolgende Pascal-Listing enthält drei 
neue Eingabefunktionen, die nun diesem 
Problem endlich ein Ende bereiten. 

Da in Pascal eigentlich nur die Eingabe von 
STRINGS, INTEGER- und REAL-Werten 
Schwierigkeiten bereiten, wurde für jeden 
Variablentyp eine eigene Eingabe-Funk- 
tion entwickelt. Die Funktionen erhielten 
die sinnvolle Bezeichnung GETSTR, GE- 
TINT und GETREAL. Je nach Anwendung 
hat man die Wahl, entweder eine einzelne 
oder alle Routinen in sein Programm mit 
einzubinden. In unserem abschließenden 
Demoprogramm haben wir beispielweise 
alle Funktionen mit eingebunden. Zu be- 
achten ist, daß vor oder mit der Einbindung 
die Variable CURTASTE als Character de- 
finiert wird. Außerdem muß ein Variablen- 
typ mit der Bezeichnung STRING 80 als ein 
80 Zeichen umfassender St ring definiert 
werden, da Funktionen bekanntlich eine 
direkte STRING-Zuweisung nicht erlau- 
ben. Das abgedruckte Programm wurde auf 
einem IBM-PC unter Turbo-Pascal entwik- 
kelt, läßt sich jedoch durch geringfügige 
Änderungen der Tastaturcodes auch auf 
andere Rechner oder Pascalsysteme über- 
tragen. 

Die neue SYNTAX 

Die Syntax der einzelnen Funktionen ist 
relativ einfach, jedoch recht umfangreich: 

xxxx := GETSTR (x,y,l,v,a,b,f,g,L) 
xxxx := GETINT (x,y,l,v,a,b,min,max,L) 
xxxx := GETREAL 

(x,y,l,k,v,a,b,min,max,L) 

Die Werte x und y stehen für die Bild- 
schirmposition der Eingabe anweisung. 
Unter Eingabeanweisung versteht man ei- 
nen Hinweis auf die verlangte Eingabe, 
ähnlich dem ,,1-NPLJT-Text" in der Pro- 
grammiersprache Basic. Die Werte x und y 
entsprechen der Pascal- GOTOXY-Funk- 
tion, beeinflussen jedoch nicht die augen- 
blickliche Position des Cursors. 

Der Wert 1 gibt die maximale Länge der 
Eingabe an. Um eine übersichtliche und 
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gleichermaßen komfortable Eingabe zu er- 
möglichen, wird das entsprechende Einga- 
befeld invers dargestellt, bzw. durch eine 
andere Hintergrundfarbe gekennzeichnet. 
Das gekennzeichnete Feld der Eingabe 
kann später nur über die Taste ENTER ver- 
lassen werden und ist somit abbruchsicher. 
Bei der Funktion GETREAL gibt 1 die Ge- 
samtlänge des Eingabefeldes an, inclusive 
Nachkommastellen und der eigentlichen 
Kommastelle. 

Die Variable V ist vom gleichen Typ wie die 
eigentliche Eingabe-Funktion. Sie kann 
dazu benutzt werden, um dem Eingabefeld 
bereits einen Wert oder einen String zu- 
zuordnen. Dieser kann dann nach dem 
Aufruf der Funktion editiert oder über- 
schrieben werden. Das Demoprogramm 
veranschaulicht den Vorgang sehr deutlich. 




Aus Ihnen wird nie etwas, wenn Sie sich 
nicht mit Turbo-Pascal befassen! 

In der Variable a kann ein Eingabehinweis, 
welcher durch x und y positioniert wird, 
vorgegeben werden. Möchte man stattdes- 
sen eine Maske verwenden, so kann die 
hier auch ein Leerstring angegeben wer- 
den. 

Die Variable b ist vom Typ Byte und dient 
lediglich als Flag. Enthält dieses Flag den 
Wert 0, so kann die Eingabe lediglich durch 
die Taste ENTER beendet werden. Enthält 
diese Flag jedoch den Wert 1, so kann Ein- 
gabe auch über die Cursortasten HOCH 
und RUNTER abgeschlossen werden. In 
diesem Fall wird der Variablen CURTA- 
STE der Tastencode 72 für HOCH oder 80 
für RUNTER zugeordnet. Diese Option 
wurde vorgesehen, um komfortable Mas- 
ken zu gestalten, in denen Felder zurück 
oder vorgesprungen werden dürfen. Das 
Demoprogramm zeigt dafür eine schönes 
Beispiel. 



Bei der Funktion GETSTRlassen sich über 
die Variable f vom Typ Byte weitere Optio- 
nen einstellen. Der Wert veranlaßt, daß 
die Eingabe so übernommen wird, wie sie 
am Bildschirm eingegeben wurde. Der 
Wert 1 verursacht ein Abschneiden der vor- 
deren Leerzeichen. Durch den Wert 2 wer- 
den die hinteren Leerzeichen abgeschnit- 
ten. Der Wert 3 schneidet die vorderen und 
hinteren Leerzeichen ab. 
Auch die Variable g dient als Flag vom Typ 
Byte. Enthält sie den Wert 0, so wird der 
String nicht verändert. Enthält sie jedoch 
den Wert 1, so wird die Eingabe in Groß- 
buchstaben umgewandelt. Dies eignet sich 
insbesondere für STRING-Abfragen und 
Vergleiche. 

Die Variable L dient ebenfalls als Flag vom 
Typ Byte. Der Wert steht für Standardein- 
gabe. Der Wert 1 sorgt dafür, daß die ange- 
zeigte Feldbeschreibung, sowie das Feld 
selbst, nach der Eingabe wieder gelöscht 
wird. Dies ist beispielsweise bei Program- 
men sinnvoll, welche verschiedene Einga- 
ben an der gleichen Position erwarten. 
Die Funktionen GETINT und GETREAL 
verlangen neben den Standardparametern 
auch die Angabe der Variablen min und 
max. Diese beiden Variablen geben an, in 
welcher Grenze sich die einzugebende 
Zahl befinden muß. Die Eingabe kann nur 
dann beendet werden, wenn sich die Zahl 
innerhalb dieser Grenzen befindet. 
Die Funktion GETREAL erlaubt, über die 
Varaible k zu entscheiden, wieviel Nach- 
kommastellen jeweils in dem entsprechen- 
dem Eingabefeld dargestellt werden dür- 
fen. Auch diese Option wird sehr gut aus 
dem Demoprogramm ersichtlich. Damit 
haben wir alle erforderlichen Parameter 
besprochen. Es liegt nun in der Hand des 
Anwenders, wie er die Funktionen verwen- 
det. Grundsätzlich kann man sagen, daß 
durch die Vielzahl der Optionen sehr viele 
Eingabe strukturen denkbar sind. Selbst 
Masken sind relativ leicht zu bewerkstelli- 
gen, was durch das Demo demonstriert 
wird. Der nächste Schritt wäre ein Masken- 
generator, vieleicht findet hier der eine 
oder andere Leser eine entsprechende Lö- 
sung. Es sei noch abschließend gesagt, daß 
die Eingabefelder absolut abbruchsicher 
arbeiten und mit den Cursortasten, sowie 
beiden DEL-Tasten wie üblich editiert wer- 
ben können. 

Übrigens: PC-Besitzer können das Pro- 
gramm für 20 DM auch auf einer Diskette 
im MS-DOS -Format beziehen. Die Be- 
stellnummer lautet PC-DI. 



Das Listing ♦ 
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type getfeld.inc 

{ Komfortable Eingabe von STRINGS, REAL- und INTEGER-ZAHLEN } 

{ Neu* Funktionen sind: GETSTR / EETREAt / SETINT > 

{ (e) F,B. exclusive fuer den TURBO-PASCAL Kurs COMPUTRONIC J 



typ» 

stringBO 



atringr.803 j 



var 
curtaste:char? 



(enthaelt letzten Tastencode) 

(und erlaubt somit den Aufbau konfortabler Basken} 



(SYNTAX! Funktion GETSTR (K,y,l,V,A,B,f,G,U 
x,y s Position der EingabEbezekhnung (z.B. 'Natei') 
1 = Maxinale Laenge der Eingabe (nax BO Zeichen)! 
V * Stringvarisbie enthielt ursaruenglichen Inhalt 
A * Etring welcher die Eingabe kennzeichnet (z.B. 'NÄHE:' oder "> 
B = Abbruch wenn Cursor nach eben a. untetif CURTASTE enthaelt Tistencodi 
F » 1 Leerzeichen m Ende abschneiden 

2 Leerzeichen ai Anfang abschneiden 

3 Leerzeichen an Anfang und Efide abschneiden 
Standard Eingabe 

G * 1 In GrcBsbuchstaaen wandeln 

Standard Eingabe 
L s 1 Feld und Felribeschreibung nach der Eingabt besehen 

Standard Eingabe } 



Function getstr (K,y,laenge :byte; 

Ursprung, AnzeigeistringBQj 

Abbruch, Format :byte; 

Gross, Loeschert :byte Isstring 



const 
Reversecolor 



Light Hagen U| 



Var 

Puffer istringBö; 

altx r alty,cK,ixibyte; 

i,tiinteger| {hilfsvariablen} 

taste, taste2ichar| 
begin 

altx:=Hheren| 

aity:=wherey; 

taste2i=»0; 

Puffers =copy (Ursprung, l,henge)j 

ii=length (Puffer) j 

if Klaenge then begin 

ii=laenge-i; 

for t:=l to i do Puffer!=Puffer+' '| 
end; 

gotoxy (x,y)| 
»rite (Anzeige); 
x:=nherex; 
yi=Kherey; 

ck:=k j {cursor x-position) 

textbackgroundlReversecolor); {bei CPC LUWIDEO) 
»tri te (Puffer) f 
repeat 

if cx=tx+laenge) then begin 
wite( A ])j 

end; 

götoxy (cx,y); 
read (kbd, taste); 
curtastes 'taste; 

if (tasteM27) and keypressed then begin 
read Ikbd, taste!) 



curta"ste! s tastej 
taste2!=taste; 

if (taste=l75) antt (cx>x) then cx:=cx-l; 
if {tasteM77l and (cxUx+Iaenge-U) then cn:=cx+1j 
if (taste=#33> then begin (DEL unten) 
for is= 1 to laenge do pt)Her[i]:=' '; 

CXi^XJ 

gotoxy Ia,y); 
Hrite (pufferl) 
end; 

if abbruch=D then taste2i=iü; 
end eise begin 
if (cx<(x+laenge)l and (tastet' ') and (taste<*127> then begin 

«rite (taste); 

Puffertcx-n+i]i=ta5te( 

end; 

if (tasteMBl and {cx>x) then begin 1ÜEL1 
tx: £ cx-l; 
gutexy (cx,y); 
«rite (' '); 
pufferCcx-K+l)!=' '; 
end; 
end; 
until itastiMlS) or !taste2*»72! or (taste2-SB0); 
tntbackground (0); (bei CPC NQRtfVIDEQ) 

if (for«at=U or {foriat=5) then begin 
i!=laengij 
Khile PufferCi]=' ' do begin 

ii-i-i) 

Puf f er :=eapy (Puffer, 1, i 1 j 

end; * 

end; 
if tfor«at B 2) or (for«at=3) then begin 

while (puffern)*' 'I and (Iength(Puffer)>Ü) do begin 
delete(Puffer,l,L); 

end; 
end; 

if gross=l then for is= 1 to length (Puffer) do Puffer[i];=uptase(PufferIi]) 
if loeschen=l then begin 

gotoxy (mx,y); 

iisx-ix+laenge; 

for t :■ 1 to i do ttrite I' '); 
end; 

gotoxy (altx,alty)| 
getstrssPufferj 
end; 



{SYNTAX: Funktion SETINT U,y,l,V,A,B|IUMM|L> 
x,y = Position der Eingabebezeichnung tz.B, 'Naeei') 
1 » HaxUale Laenge der Eingabe (iax BO Zeichen); 
V * Integerviriable entnaelt urspruengliehes Inhalt 
A « String welcher die Eingabe kennzeichnet (z.B. 'NAHE:' oder "I 
E - Abbruch wenn Cursor nach oben o. unten; EJRTASTE enthaelt Tastencode 
WIN - Kleinste noegliche Zahl der Eingabe 
KAX = Groesste loegliche Zahl der Eingabe 
L x 1 Feld und Feldbeschreibung nach der Eingabe loeschen 
Standard Eingabe } 



funetion getint (x,y, laenge ibyte; 



Ursprung 


tinteger; 


Anzeige 


:strjngB0; 


Abbruch 


ibyte; 


Min,t1ax 


finteger; 


Loeschen 


sbyte ) (integer; 



const 
Reversecolor = Lightriagenta; 
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Vir 

Puffer, ürstring tstringBOf 

altx,ilty,:K,ixsbytt| 

t,t, zahl (integer; (hilfsvariablen) 

taste, tasteZiehir) 
begin 

iltxi*Nh(rtx| 

altyt a Nherey; 

•X!»XJ 

*tr (Ursprung, Uritringl; 
Pufferi*copy(Urstring,t,laenge)! 
ii»length(Puffer); 
if i<laenge thtn begin 

ti s laengt"i; 

for ti«l to i du Pufferi»Puffirt' •; 
end; 

gotoxy (x,yl; 
urite (Anzeige)) 
x:=Nh«r#x| 
y:=Nhereyj 

repeat 
gotoxy ix,y)j 
tiitiZi-IQ| 

cki s x; (cursor x-position) 

textbatkgroundlReversecolor); (bei CPC LÜNVIDEO) 
«rite (Puffer); 

repeat 
if ocixtl aenge) then begin 
nrite( A g); 

CKI=CK-t| 

end; 

gotoxy lcx,y){ 

read (kbd, taste); 

curtastertaste; 

if (taite=*27) and keypressed then begin 

read (kbd, taste); 

curtaste: »taste; 

taste2i=tastej 

if (tastesi75) and fcx>x) then cxi*cx-l; 

if (taste**77) and ln<(x+laenge-l)> then cx)=cx+if 

if (tast(M83) then begin (DEL unten) 
for if« 1 to laingi da puffert!]!*' '; 

CXI'Xj 

gotoxy (cx,y); 
Nrits (puffir); 
tnd; 

if *bbruch*0 then taste2i=IOj 
end eise begin 
if (ex<(x+laenge)) and (taste in ['§',.")','-',' ']} then begin 

urite (taste) | 

Puffertcx-mh'tiiti; 

cxs«ex*l| 
end; 
if (tuti-IB) and (ex>x) then begin (DEL) 

CKI*CX-i) 

gotoxy (cx,y); 
wttt (' M| 
puffirtcx-x+ll!*' '; 
end; 
end) 
until (tntt>li3) or (tutiM72) ar (tiste2-«90); 
textbackgrotind (0)| (Dil CPC NORMVIDEO) 

Urstringt»puffer; 
ii'laenge) 

Nhile PufferüK ' da bigin 
it*i-l| 
Puffer!*copyfPuffBr,l,l)j 



end"; 

Mhüe (pufferen^ ') and (length (Puffer) >0) do begin 

deletelPuffer,!,!); 
end; 

val (Puffer, Zahl, i); 
Puffer!*Urstring; 
until !i=0i ind {zahl>*iin) and lzattl(*i.ax)) 

if loeschen=l then begin 

gotoxy (ix,y)( 

is=x-tx+la§nge; 

for t i= 1 to i do «rite (' '); 
end; 

gotoxy (altx,alty); 
getinti-zahli 
end) 



{SWMi Funktion 6ETREAL (x,y ) l,k,V,A ) B,HIK,lfAK,L) 
x,y = Position der Eingabebezeichnung (z.B. F Na«t'l 
1 * Maxinale Laenge der Eingabe dax BO Zeichen) 
t - Anzahl der Nach koMis teilen 
V * REAlvariable enthielt urspruenglichen Inhalt 
A = Strirg welcher die Eingabe kennzeichnet (z.B. 
6 = Abbruch Nenn Cursor nach oben o. unten CURTASTE enthielt Tastencode 
MIN = Kleinste aoegliche Zahl der Eingabe 
ItAX = Groesste «oegliche Zahl der Eingabe 
L > L Feld und Feldbeschreibung nach der Eingabe tatschen 
Standard Eingabe } 



•MHEi« oder "J 



funetion getreal(x,y,laenge,n ibytt; 



Ursprung 


treal; 


Anzeige 


tstring90; 


Abbruch 


tbyte; 


nin,Hi» 


jreal; 


Loeschen 


tbyti hreal; 



const 
Reversecolcr - LightHagenta; 

Var 

Puffer, Ürstring tstringBO; 

zahl sreai; 

iHx,alty,cx,ixsbyte; 

i,t:integer; (hilfsvariablen) 

taste, taste2tchar; 
begin 

altxs=*herex| 

altyi s *herey; 

«XfKj 

str (Ursprungs laenge-n-lin,Urstr'ing); 
Puf f er :=copy (Ürstring, l t laenge); 
ii*length(Puffer); 
if Ulaenge then begin 

ti=laence-it 

for ts«l to i do Puffert«Puffir+' '( 
end; 

gotoxy (x,y)j 
«rite (Anzeige); 
xi'Hherex; 
yi «untre y; 

repeat 
gotoxy (x,y); 
tiste2i>IO| 

ck!»x; {cursor x-positijjnl 

tixtbickgroundtfitversecoloD) (bei CPC L0UV1DEO) 
urite (Puffer); 

repeat 
if ex« (x+1 senge) then bigin 
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«rit* Cg)) 
cm : =cn-i) 

end) 

gotoxy (cK,y) ; 

read (kbd, taste)) 

curtastei=taste; 

if 1taste=*27) and keypressed then begin 

read I xbd, taste) ; 

curtistei'tastej 

tasttZi -taste; 

if (tasteM75) and (cx>x) then cx^ci-lj 

if (taste=*77) and (cx<(x+l*enge-t)) then cxi=c«+i ; 

if (taste=H3) then begin (DEL unten) 
for ii« 1 to laenge do pufftr[i]t»' '| 

CX]=X) 

gotoxy (cx,y)j 
«rite (puMerli 
end; 

if »bbruch»0 then taste2iM0) 
end eise begin 
if Icxdx+laengel) and (taste in Vf. , 'V ,'-','.' ,' ']) then begin 
■rite (taste) j 
Fu^«r[cK-x+l]!«tastB| 
cxi»cx*li 
end; 

if (tastet) and lcx>xl then begin (DEL) 
cxi*cx-lt 
gotoxy (:x,y); 
»tritt (' ')( 
puffer[cx-x+l]i*' '| 
end) 
end; 
until (tasteM13) er Itaste2=l72) or (taste2M80); 
textbaekground (0)) {bei CPC NÜRHVIDEG) 

Urstnng^puffer; 
i:=l aenge; 

Khile PuffertN*' ' do begin 
n*i-l| 

Puffert=copy(Puffer,l,i)j 
end) 
Nhile (puffer[l>' ') and (length(Puffer)>0) do begin 

deleteSPuffer,i,l}) 
end; 

val (Puffer, Zahl.i); 
Puffert*Urstringi 
until (i*0) and (zahDuin) and (zahK'iax); 

if loB!chBn=l then begin 

gotoxy (ix,y); 

it s x-ixH aenge; 

for t i" 1 to i do »rite (' 'I; 
end; 

gotoxy (altx,alty)| 
getreal !=zahl; 
end; 




type deio.pai 

prograi deio; {Kurie Dnonitrition der Eingabe-Routinen) 

£ti getfeld.inc Eingabe-Routinen »erden eingebunden) 



var 



Zeitschrift, veriag,artistringt20]j 

postfach,plziintegerf 

heftpreiisreal; 

laehter unteger; (hilfsvariable fuer nske) 



clrscr; 

«riteln (' Deionstration der neuen Eingabe-Routinen !c) F.B, ')) 

wi teilt (' — Coiputronic — '); 

{Variablen einen bestirnten Hert vorgeben! ) 

Zeitschrift !*'Ca«putronic'| 

verlagi='Tronic-Verlag'i 

po5tfachi=670| 

plzt=3440f 

ort!*'EschHege' j 

heftpreisi-6,5; 

(Die eigentliche Eingäbet ) 

Zeitschrift!* getstrfJ^^O.zeitschrift, 'Zeitschrift! ',0,3,0,0)1 
verlags' getstr(3,4,20,¥erlag, 'Verlagi ', 0,3,0,0); 
pastf ich i ■ pjeti nt ( 3 , B, 5, pastf ich, » Poitf «h ',0,0,eaxint,0)j 
plzi- getint f3 r 10 t 4,plz T 'PLZ. i ', 0,0,99??, 0); 



'ftpreisi ',0,1,10,0); 



begin 



fjxii- yriini, iJ r IV,l,piI,TLi.l ', U,0, 9999,0) | 

orts= getstr (15,10,20, ort, 'Ort! ',0,3,0,01; 
heftpreiu* getreal (3,12,5,2,heftpreis,'He 

drscrj 

■Titeln ('Das gleiche noch einmal jedoch diesnai Hit Feldloeschungs'l; 

Zeitschrift!* getstr (3, 4, 20> Zeitschrift, 'Zeitschrift! ',0,3,0,1); 

verlag { = getstr(3,6,20,verUg,'Ver!ag! ',0,3,0,1)1 

postfachi= getint<3,fi,5,pastfaeh, 'Postfach f , 0, 0, a*xint r 1) i 

plii- getint (3,10,4,plz,'PLZ,i ',0,0,9999,11; 

ort:' getstr (15, l0,Z0,ort,'Drtl ',0,3,0,1)) 

heftpreis!* getreal <!,12,5,2,fieftpreis,'Heftpreis! ',0,1,10,11; 

uriteln; 

»ritelnCDie letzter Eintragungen!'); 

tiritelnj 

writeln (Zeitschrift)) 

uriteln (verlag); 

writeln ('Postfach ',po!tfath)| 

uriteln Iplz,' ',ort)| 

uriteln CHeftpreisi ' , heftpreis: 2t 2) ; 

»riteln; 

uriteln ('Bitte Taste druecken!'); 

repeat until keypressed; 

c4rscrj 

»riteln ('fluch richtige Masken sind loeglichs'); 
«riteln ('Probieren Sit die einul die Curscrtasten RAUF bzw. RUNTER' ); 
zaehlirsel; 
repeat 
eise zaehler of 

li Zeitschrift!» gitstrt3,4,20,zeitschrift, 'Zeitschrift! ',1,3,0,01) 

2; verlags» getstr(3,i,20,veriag,'Verlagi ',1,3,0,01; 

3; postfach:« getint(3,B, 5, postfich, 'Postfach M,0,iaxint,0)j 

4t plxs* getint (3,10,1, plz, 'PLZ. i ',1,0,9999,0); 

5i ort!» getstr (15, 10, 20, ort, »Ort! ',1,3,0,0); 

ii Itfflpnin« getreal (3,12,5 r 2,htftpreii,'Heftpretii ',1,1,10,0)1 
end; * 

if curtasteM72 then zaehltriizaehler-1 

eise za!hlen*zaehltr+l; 

if zaehlerd then zaehlen- 1; 

until zaehler«7; 

clrscr; 

NritelnCOie letzten Eintragungen! ')) 

ttritsln; 

uriteln (Zeitschrift)) 

»riteln (verlag)) 

«riteln ('Postfach ' r postfach)| * 

uriteln Iplz,' ',nrt); 

uriteln CHeftprein ',heftpreisi2t2) j. 

uriteln) 

uriteln ('Bitte Taste druecken!')) 
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Die Gewinner 



Auch diesmal haben die fünf Datenträger Ihre Gewinner gefunden! Dabei kamen wir in der 
Redaktion uns schon fast vor wie in der Sportschau bei der Auslosung zam Tor des Monats. Ein 
Berg an Zuschriften hat uns diesmal erreicht. Giücksfee Heike hat folgende fünf Gewinner aus 
dem Postkarten-Hügel gezogen: 

Marlies Kusian, 6588 Dienstweiler 
G. Kruse, 2000 Hamburg 7.4 
Michael Symanski, 3000 Hannover 71 
Olaf Richter, WOß Berlin 65 
Till Schreiter, 6365 Rosbach 2 



Warum gewinnen immer 
nur die anderen? 




Wettbewerb 



Spitzenmäßigi 



f 



Für nur 60 Pf können Sie wieder eine Programm-Diskette/ Kassette aus dem Repertoir des 
Tronic-Verlags gewinnen. Insgesamt werden wieder fünf unserer Datenträger 
verlost. Was Ihr tun müßt, um Zugewinnen? Ganz einfach ( Diesmal geht 
es um urige Sprüche. 

So zum Beispiel: 

Alle Kinder laufen um das Haus, 

nur Klaus 

schaut raus! 

oder 

Alle Kinder spielen auf der Walze, 
nur Günther 
liegt drunter! 

Auf geht's! Schnappt Euch eine Postkarte 
und schreibt Eure Sprüche drauf. Vergeßt 
aber nicht die Bestelt-Nr. Eures Programm- 
wunsches mit auf die Karte zu kritzeln, sonst 
scheidet Ihr schon vorzeitig aus. Das Ganze - 
geht dann an den; Tronic-Verlag; Stad 35; 
3440 Eschwege. 



Gewinnen Sie eine Reise auf 
eine einsame Insel, ha! . 
Toller Wettbewerb! 




Korrektur 



Durch ein kleines Mißgeschick in Form eines Zahlendrehers war der Schneider- Checksummer V 2.0 
bislang nicht für den CPC-664 geeignet. Nach folgender kleiner Korrektur ist dieser Fehler nun beseitigt: 
In Zeile 1270 muß der Wert &96 durch &69 ersetzt werden. Nun können auch die CPC-664-Anwender 
in den Genuß unseres Checksummers gelangen. 
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Die Flexibilität eines Programms wird be- 
sonders durch die im dritten Teil bespro- 
chene IFTHEN -Anweisung gewährleistet: 
Je nach Bedingung kommt etwas anderes 
zur Ausführung. Allgemein ausgedrückt 
könnte man sagen, daß durch solche Kon- 
trollstrukturen die zeilenweise Abarbei- 
tung der Befehle eines Programms unter- 
brochen wird und eine Verzweigung im Pro- 
grammablauf stattfindet. Bei der FOR TO 
DO Anweisung geht es weniger um eine 
Verzweigung als vielmehr um eine Schleife, 
d.h. eine bestimmte Anweisungsfolge wird 
genauso oft ausgeführt, wie es in der FOR 
TO DO- Anweisung vorgesehen ist. Sowohl 
die IF THEN-Anweisung, als auch die 
FOR TO-Schleife, wird denen, die schon in 
BASIC programmiert haben, bekannt vor- 
kommen. In PASCAL gibt es noch zwei 
weitere Befehle, mit denen Schleifen pro- 
grammiert werden können: die REPEAT-, 
UNTIL- und die WHILE DO-Strukturen. 
Darauf werden wir gleich zu sprechen kom- 
men. 

Zunächst wollen wir aber einen neuen Da- 
tentyp besprechen, um überhaupt sehen zu 
können, wozu Kontrollstrukturen wie 
Schleifen nützlich sein können. 
Ein Programm besteht immer aus Daten- 
strukturen (dem zu bearbeitenden Mate- 
rial) und Algorithmen (den Werkzeugen). 
Das sehr praktische Werkzeug „Zählschlei- 
fe" ist für eine spezielle Datenstruktur sehr 
gut geeignet, die wir noch nicht besprochen 
haben: das sogenannte ARRAY oder auf gut 
deutsch „Feld" (Wer in Mathematik etwas 
bewandert.ist, kann genauso gut „Vektor" 
oder „Matrix" sagen). 
Ein ARRAY ist prinzipiell eine Variable wie 
jede andere auch - mit einem hochinteres- 
santen Unterschied: sie kann mehr als eine 
Zahl beinhalten, ja, sie kann unter Umstän- 
den tausende von Zahlen beinhalten (um ge- 
nau zu sein: es muß sich natürlich nicht um 
Zahlen handeln, es können auch andere 
Zeichen, kurz, alle Arten von Daten sein). 
Um die einzelnen Zahlen eines ARRAY 
noch unterscheiden zu können, bekommt 
jede Zahl einen Index (deshalb spricht man 
manchmal auch von indizierten Variablen), 
d.h. eine Kennziffer, mit der man jede ge- 
wünschte Zahl des ARRAY wiederfinden 
kann. Ein ARRAY kann etwa so aussehen: 

20 655 
11 780 
13 735 

21 691 

In diesem Fall könnte die erste Spalte (also 
20, 11, 13,21) die Startnummereines Sport- 
lers bei einem Leichtathletikwettkampf be- 
deuten und die zweite Spalte die Weite, die 
der/ die Sportler/in etwa im Weitsprung ge- 
sprungen ist (in cm). Wenn wir diese Werte 




Der Turbo-Pascal-Kurs soll nicht wichtig sein? 

In der Zukunft werdet Ihr den alle Nase lang brauchen ! 



in eine Variable packen wollen, können wir 
sie z.B. „Weiten" nennen. Der Typ dieser 
Variablen wäre „ARRAY"; außerdem müs- 
sen wir die Größe der Variable bestimmen. 
Das alles geschieht im Deklarationsteil 
und würde, wenn genau vier Sportler am 
Start wären, so aussehen: 
weiten: ARRAY[1..4, 1..2] of integer; 
Was bedeutet das? Klar ist, daß wir zu- 
nächst, um die Variable „weiten" zu dekla- 
rieren, angeben müssen, daß es sich um ein 
ARRAY handelt: das eben tun wir durch 
die Angab e'ARRAY'. Dann müssen wir an- 
heben, wieviele Zahlen, man nennt sie in 
diesem Zusammenhang auch Elemente 
oder Komponenten, in das ARRAY passen 
sollen. Wir haben vier Zeilen und zwei 
Spalten, also 4x2=8 Komponenten und 
schreiben deshalb nach der eckigen Klam- 
mer zuerst 1..4, was soviel heißt wie „die 
Zeilen dieses ARRAY gehen von 1 bis 4" 
und anschließend nach einem Komma 1..2 
was soviel heißt wie „die Spalten gehen von 
I bis 2" Man sieht also, daß die erste Anga- 
be sich auf Zeilen, die zweite auf Spalten 
bezieht und die Anzahl der Komponenten 
eines ARRAY immer die Zeilenzahl multi- 
pliziert mit der Spaltenzahl ist. 
Um ganz genau zu sein: ein ARRAY muß 
nicht notwendigerweise aus Zeilen und 
Spalten bestehen. Wenn es nur aus einer 
Zeile besteht, kann man die zweite Angabe 
in der eckigen Klammer weglassen und 
man bekäme dann eben ein Feld mit einer 
Zeile bzw. einer Spalte (was keinen Unter- 
schied macht). Außerdem ist man nicht auf 
Zeilen und Spalten begrenzt: man kann in 
der eckigen Klammer noch mehr Angaben 



machen -eine dritte Angabe der Form 1..10 
könnte man z.B. als weitere zehn Spalten 
oder .„Säulen" interpretieren, die zu den 
vorherigen Zeilen und Spalten senkrecht 
stehen und prinzipiell könnte man auf die- 
se Weise ARRAY mit vielen Dimensionen 
herstellen. Den mathematisch nicht so ver- 
sierten unter euch wird das etwas spanisch 
vorkommen, wir erwähnen es nur der Voll- 
ständigkeit halber und werden vorläufig 
nur mit ARRAYs arbeiten, die eine be- 
stimmte Anzahl von Spalten und Zeilen 
haben. 

Erinnern wir uns an den Vergleich einer Va- 
riable mit einer Schublade: die Schublade 
hat einen Namen und einen Inhalt, den 
Wert. Wir sind bisher immer davon ausge- 
gangen, daß jede Schublade (Variable) ge- 
nau einen Wert beinhalten kann. Der AR- 
RAY-Typ zeigt, daß dem nicht so sein muß. 
Wir können uns ein ARRAY als eine 
Schublade mit vielen Fächern vorstellen, 
jedes Fach der Schublade hat eine Kennzif- 
fer, den Index, und einen entsprechenden 
Inhalt, eben ihren Wert. Wichtig ist, daß bei 
ARRAYs alle Komponenten (d.h. alle Fä- 
cher einer ARRAY- Schublade) vom glei- 
chen Typ sein müssen: ich kann also nicht 
in ein Fach eine integer-Zahl hineinlegen 
und in ein anderes Fach ein char-Zeichen, 
Wenn wir einer Komponente eines ARRAY 
einen Wert zuweisen wollen, müssen wir 
sie über ihren Index ansprechen, z.B. 
weiten [1,2]: =655; 

d.h. der Komponente in der ersten Zeile 
[1,2] und zweiten Spalte [1,2] wird der Wert 
655 zugewiesen. Genauso können wir na- 
türlich auch abfragen, was in einer be- 
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stimmten Zeile und Spalte steht, z.B. mit 
writeln (weiten [3,1]; (das Ergebnis wäre 
13). 

Vielleicht ist euch inzwischen auch schon 
klar geworden, warum eine Zählschleife 
zur Bearbeitung von ARRAYs besonders 
nützlich ist. Haben wir zum Beispiel eine 
Variable so definiert: 
noten: ARRAY[1..6] of integer; 
dann bedeutet das, daß die Variable noten 6 
Zeilen (und nur eine Spalte hat), also 6 
Komponenten aufnehmen kann. Wenn wir 
wissen wollen, welcher Wert in jeder Kom- 
ponente steht, wäre es Unsinn, jedes Ele- 
ment einzeln anzusprechen, einfachergeht 
es so 

for i:=l to 6 do 
writeln(noten[i]; 

Was passiert? Die Schleife zählt von 1 bis 6. 
Nach jedem Zählschritt hat die Zählvaria- 
ble i den entsprechenden Wert (nämlich 
zuerst 1, dann 2, dann 3 ...)• Dieser Wert von 
i wird dazu benutzt, ihn als Index für die 
Variable „noten" einzusetzen: notenÄiÜ - 
im ersten Zählschritt wäre das äquivalent 
mit noten[l] und wir bekämen den Wert der 
Komponente in der ersten Zeile von „no- 
ten" ausgedruckt. Und so ginge es weiter bis 
i den Wert 6 hat. Dann wird die Schleife ver- 
lassen und der nächste Programmbefehl 
ausgeführt. 

Wir wollen ein kleines Beispielprogramm 
schreiben. Nehmen wir als Ausgangspunkt 
das Programm „quadrat-und-wurzel" aus 
Teil 3. Das jetzige Programm soll ebenfalls 
für alle Zahlen von 1-10 das Quadrat und 
die Wurzel berechnen, die Werte aber nicht 
ausdrucken, sondern in einem Feld abspei- 
chern. In diesem Feld soll in der ersten 
Spalte die Zahl, in der zweiten ihr Quadrat 
und in der dritten Spalte die Wurzel der 
Zahl stehen. 

PRGRAM quadratwurzelfeld; 

VAR i,j: integer; 



3: feld: ARRAY [1..10,1..3] ofreal; 

4: BEGIN 

5: clrscr; 

6: FOR i : = 1 TO 10 DO 

7: BEGIN 

8: feld [Kl] :=i; 

9: feld[L2] : = sqr(i); 
10: feld[i,3] : = sqrt(i) 
11: END 
12: END 

In Zeile 7 bis 11 steht eine Verbundanwei- 
sung, die zehnmal durchlaufen wird: bei je- 
dem Durchlauf ist die Variable i (die Zähl- 
variable) um 1 erhöht und entsprechend 
wird das ARRAY 'feld' mit i und den Wer- 
ten des Quadrats und der Wurzel von i ge- 
füllt. Die Definition der Variable 'feld' in 
Zeile 3 beschreibt 'feld' als eine Schublade 
mit 10 Zeilen und 3 Spalten und der Typ 
von Zahlen, der in den Fächern abgelegt 
werden kann, sind real-Zahlen. 
Will man sich die Werte noch ausdrucken 
lassen, kann man Zeile 11 folgenden An- 
hang mit ins Programm aufnehmen: 
12: FOR i: = 1 TO 10 DO 
13: FORj: = lT0 3DO 
14: writeln (feld [i,j]; 
Statt einer FORTO DO Schleife ist es oft 
hilfreicher, eine REPEAT UNTIL Anwei- 
sung zu verwenden., REPEAT UNTIL 
heißt auf gut deutsch soviel wie: Wiederho- 
le dies und das solange, bis dies oder jenes 
der Fall ist. 
z.B.; 

Wiederhole folgendes: 
„Schreibe i 
Erhöhe i um 1„ 
bis i den Wert 10 hat. 
Wir hätten damit eine FOR TO Schleife 
nachgebaut. Der entscheidene Vorteil von 
REPEAT UNTIL ist, daß die Anzahl der 
Schleifendurchläufe nicht von vornherein 
feststehen muß, sondern nach jedem 
Durchlauf wird eine Bedingung, die hinter 



dem Wort UNTIL steht, geprüft und je 
nachdem die Schleife nochmals durchlau- 
fen. Sehen wir uns folgendes Programm- 
stück an: 
1: REPEAT 

2: write ('Gib eine Zahl ein '); 
3: readln (zahl); 
4: writeln ('Das Quadrat davon ist ', 

sqr(zahl)) 
5: UNTIL zahl = 0; 

Was passiert? Eine Zahl wird eingegeben 
(Zeile 3) und das Quadrat der Zahl wird 
ausgegeben (Zeile 4). Dann, in Zeile 5, wird 
geprüft, ob die ZAHL DEN Wert hat: 
wenn ja, wird die Schleife abgebrochen, 
wenn nicht, wird die Schleife ab Zeile 2 
nochmals durchlaufen und so weiter bis der 
Wert eingegeben wurde. 
Halten wir folgende Eigenschaften von 
REPEAT UNTIL fest: Es ist eine Schleife, 
die mindestens einmal durchlaufen wird. 
Am Ende der Schleife, bei UNTIL, wird ge- 
prüft, ob die Schleife nochmals durchlau- 
fen werden soll. Zwischen REPEAT und 
UNTIL können beliebig viele Anweisun- 
gen stehen, die (und das ist für PASCAL et- 
was seltsam) nicht(!) als Verbundanwei- 
sung stehen müssen (also nicht mit BE- 
GIN und END eingeschlossen sein müs- 
sen). * 
Ähnlich und doch auch anders ist die WHI- 
LE DO Schleife. Ihr Verhalten kann etwa so 
beschrieben werden: 

Solange dies und das wahr ist, mache das 
folgende: „bla bla...„ 
In Pascalianisch: 
1: WHILEilODO 
2: BEGIN 
3: write (i); 

4: writeln ('Das Quadrat: 'sqr(i)); 
5: END; 

Die Unterschiede zu REPEAT UNTIL lie- 
gen auf der Hand: Die Prüfung einer Be- 
dingung erfolgt am Anfang und nicht am 




BIG 
BOSS 



Gutes Zeugnis mag ja sein, aber haben Sie denn 
auch den Turbo-Pascal-Kurs absolviert? 
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Ende der Schleife. Das hat zur Folge, daß, 
im Gegensatz zu REPEAT UNTIL, die 
Schleife nicht unbedingt einmal durchlau- 
fen werden muß. Stößt das Programm im 
Ablauf auf eine WHILE Anweisung und 
die Prüfung der Bedingung ergibt, daß sie 
falsch ist, so wird die ganze WHILE DO 
Schleife übersprungen. Der zweite Unter- 
schied ist auch sofort zu sehen: Die Anwei- 
sungen, die innerhalb der Schleife ausge- 
führt werden sollen, müssen, wenn es mehr 
als eine Anweisung ist, mit BEGIN und 
END als Verbundanweisung eingeschlos- 
sen werden. 

Für die REPEAT Anweisung soll noch ein 
kleines, aber sehr nützliches Beispiel fol- 
gen. Manchmal will man den Programma- 
blaufunterbrechen, z.B. um sich ein Ergeb- 
nis in Ruhe anzusehen, und durch Drücken 
einer beliebigen Taste soll es weitergehen. 
Das erreicht man durch folgende Pro- 
grammzeile: 
REPEAT UNTIL KEYPRESSED; 

Zwischen REPEAT und UNTIL steht 
„nichts", also macht das Programm auch 
nichts, d.h. es bleibt einfach stehen. Und 
zwar solange, bis die Funktion KEYPRES- 
SED wahr ist. KEYPRESSED ist eine ein- 
gebaute PASCAL Funktion, die überprüft, 
ob eine Taste gedrückt wurde. Wenn dies 
der Fall war, ist KEYPRESSED wahr (hat 
den Wert TRUE) und folglich wird die RE- 
PEAT Schleife beendet. 

Wir wollen unsere neuen Kenntnisse in ei- 
nem etwas längeren Programm zusam- 
menfassen. 

Tippt das Programm am besten ab, compi- 
liert es und laßt es ein paar mal laufen, um 
zu sehen, was passiert. Dies ist schon ein 
ziemlich langes Programm und wir werden 
die wichtigsten Punkte jetzt durchspre- 
chen. Wenn ihr nicht sofort alles versteht, 
ist das nicht schlimm. Programme zu ver- 
stehen ist auch eine Übungssache. 
Was macht das Programm? Es liest zwei 
Zahlen ein, z.B. 2 und 4 und berechnet das 
Ergebnis für die mathematische Funktion 
2 (hoch 4) (wer es nicht mehr weiß: 2 hoch 4 
bedeutet, daß die 2 viermal mit sich selbst 
malgenommen wird, also 2x2x2x2, das Er- 
gebnis ist 16). Das Ergebnis wird in einem 
ARRAY abgespeichert. 
In den Zeilen 2 bis 5 werden die benötigten 
Variablen definiert (Deklarationsteil). In 
Zeile 6 beginnt das Hauptprogramm. Zu- 
nächst bekommen die Variablen „zaehler" 
und „antwort" einen Wert zugewiesen (Zei- 
le 7). In Zeile 8 beginnt die REPEAT- 
Schleife. Sie endet erst (Zeile 39), wenn der 
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PRUÜRAM K_hr-.ch„yf 
VAR >: , r esul t at i real) 

y r zaebl er , i : Integer; 

r.peichen ARRnYl 1 • . 20, 1 . . 31 of realf 
mitwar ti charj 
DEQ1N 

zaehlen=0r an t vor t i ™* J r i 
REPEAT 

clrscr; 

2aehlert=£»ehler+lj 

uritelnCDieses Programm berechnet das Ergebnis 

fuer die' ) j 
wrlt*lt*«r* mathematische Funktion x hoch y fuer den 

Fal 1 , ' ) j 
wr 1 telnCdasa X und y ganze Zahlen sind')) 
wr i t eln| 
writelnC'Die Ergebnisse werden in ei nein 

Array gespeicher t .*> | 
wr i t ©Inf 

wr i teC Eingabe von xt * )$ reariln(x); 
wr i te(* Ei ugabe von yi ')j r*adin(y)| 
writelnt'Es wird berechnet! r ,xi0:2,' hoch ',y>) 
wr i teln; 

IF y-0 TUEN r esul tat i=if 
1F y=l TUEN resultati*<x 
ELSE BEälN 

i: = l r 

reeultat : =1 y 
WHILE i<=y DO 
EEQIN 

r esu 1 1 a 1 1 °r esul t at *x ; 
11=1+1 
END 
ENUf 
wr i telnCÜas Ergebnis 1 autet i *.' , r esul tat i 10t 3) \ 
writelnj 

Speicher Czaehl er t l Zt~y.\ 
5peiclierCzaehler t 23t"yf 
spei eher Czaehl er ,3] i =r esul tat i 
wri telnCWol len Sie noch ein* Rechnung durch fuehren? 

C.j/iO'Jj 
readl n (Antwort > 
UNTIL (antwort = »i»') or (zaehl er»2CO | 

writeC'Feld ausdrucken ? <j/n)i 'J| readin <antwort ) } 
clrscr; 

IF antwort«'. )' 
TUEN FÜR i i ~i Tu zaehter IJÜ 

wr l tel n<spei eher 1 1 , 1 3 i 0: 2, ' hoch ', 

speichern, 2Ji0iÜ, » - ', Speicher Ci . 33i Oi 2) i 
END. 



Benutzer auf die Frage „Wollen Sie noch ei- 
ne Rechnung durchführen?" mit „n" ant- 
wortet oder, wenn schon 20 Berechnungen 
durchgeführt wurden. (Übrigens ist die 
Zahl 20 willkürlich gewählt!) 
In den Zeilen 21 bis 31 steht der Algorith- 
mus für die Berechnung. Hier werden drei 
Fälle unterschieden: 

1: y ist 0, dann ist das Ergebnis immer 1, 
egal welchen Wert x hat (das ist mathema- 
tisch so definiert und man muß sich damit 
abfmden)(Zeile21) 

2: y ist 1, dann ist das Ergebnis immer der 
Wert von x, egal welcher Wert das ist (z.B. 
545 (hoch 1) = 545) (Zeile 23) 
3 : y ist größer als 1 , dann wird x eben y-mal 
mit sich selbst malgenommen (Zeile 23 bis 
31) 

Versucht am besten, das Programm mit ei- 
nem einfachen Beispiel (2 hoch 4) schritt- 
weise nachzuvollziehen und notiert dabei 
auf einem Stück Papier die entsprechenden 
Werte, die die einzelnen Variablen gerade 



bekommen. Dadurch bekommt man ein 
Gefühl für die Logik des Algorithmus. 
(Dies nennt man übrigens den sog. 
„Schreibtischtest", der sehr wichtig ist, um 
auch die Korrektheit von Algorithmen 
nachzuprüfen.) 

In Zeile 32 schließlich wird das Ergebnis 
ausgegeben. In Zeile 34 bis 36 passiert fol- 
gendes: In das ARRAY „Speicher" werden 
die Werte für „x", „y" und „resultat" so ein- 
gelesen, daß in einer Zeile in der 1. Spalte 
der x-Wert, in der 2. Spalte der y-Wert, und 
in der 3. Spalte der Wert des Ergebnisses 
(„resultat") steht. Dies wird benutzt, um 
anschließend (Zeile 43 und 44) die gespei- 
cherten Werte als Tabelle auf dem Schirm 
darstellen zu können. 
Das war's für heute! Versucht möglichst 
viel mit Pascal auf dem Rechner zu üben. 
Übung macht auch im Programmieren den 
Meister. 
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Was für ein Angebot! Programm-Pakete zu 

unglaublichen Preisen! Greifen Sie zu! 

Hier sind sie f unsere 

SUPERPAKETE 



SPITZE 




Superpaket 1 
Spiele 

Monster Attack / Projekt / High Noon / 
Brieftaube / Cadelon /Turbo Jet / Sea At- 
tack /The Maze Graze Game / Galaxi / Spa- 
ce Comets / Skeet / Vampir / Memory 



Kassette 20,- 
Diskette 20,- 



SP-C-K-1 
SP-C-D-1 



Superpaket 2 
Spiele 

Tank Duell / Astronaut / Jungle 1 / Jungle 2 
/ Sufo / Fire Legion / Spiders / Star Battle / 
Super Breakout / Mission Rescue / Road- 
painter / Moonsweeper / Scotti 

SP-C-K-2 Kassette 20,- 

SP-C-D-2 Diskette 20,- 



Superpaket 3 
Anwender ' 

The Basic / Basicreset / Data- Generator / 
Print- Generator / Supermon-64 / Restore 
N / Disky 1.0 / Fill-Loader / Funktions- 
tasten-Belegung / Autostart / Multibasic / 
Bildeditor/ Spritehilfe+Demo / Autonum- 
ber / Micro- Tools+Mloader 



SP-C-K-3 
SP-C-D-3 



Kassette 20,- 
Diskette 20,- 




Superpaket 1 
Spiele 

Horror Castle / Fantasy County / Senso / 
Jumping Joe / Schatztaucher/ Shaolin / Ci- 
ty Runner 



SP-O-K-1 
SP-O-D-1 



Kassette 20,- 
Diskette 20,- 




800 XL/130 XE 

Superpaket 1 
Spiele 

Donkey Kong / Ball Harbour / Fighting / 
Diamond / Super Miner 



SP-I-K-1 
SP-I-D-1 



Superpaket 2 
Spiele 



Kassette 20,- 
Diskette 20,- 



Aquanaut / Jumping Ghost / Magic Fire / 
Cambodia / Splat 



SP-I-K-2 
SP-I-D-2 



Kassette 20,- 
Diskette 20,- 




Superpaket 1 
Anwender 

Soft Talker / Funktionstasten / Basic- Kon- 
verter / Hilfsprogramm / Disk- Menü-Ge- 
nerator / Super-Datei / Maskengenerator / 
Disk-Katalog / Painter / Musik-Maker 



APD 1/85 



Superpaket 2 
Spiele 



nur Diskette 27,- 



Hubschrauber / Castle of Doom / Bowling 
/ Donovan / Jumper / Tic- Tac-Toe / Dia- 
monds / Reversal / Fight / Karambolage 



APD 2/85 



nur Diskette 27,- 



Weiter geht's 




Trudehen, das ist die letzte Computronic auf dem Markt! 

Für zwei Riesen besorge ich Dir so gar die Software dazu! 

Wir wissen nicht, was Trudehen macht, wir empfehlen das Kombi-Abo vom Tronic-Verlag! 

Da kommt die neueste Zeitschrift mit der neuesten Software direkt ins Haus! 
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SUPERPAKETE 



* * * * 




Superpaket 1 
Spiele 

Alien Hunter / Catch / Interceptor3 D / Ci- 
ty Lander/ Conan's Castle / CopterPatrool 
/ CPC Bert / Crash / Demon Attack / Duell 
/ Etis / Labyrinth / Miner /Tower / Snider's 
Maze / Geister Schloß / Fallschirmspringer 
/ Secret Valley / Aladin / Haunted Castle / 
Cave Runner / Cobra / Erwin / Krümi / 
Q-Bert 



SP-SR-K-1 
SP-SR-D-1 



Superpaket 2 
Anwender 



Kassette 20,- 
Diskette 27,- 



Back up / Data gen / Datenverwaltung / 
Discopy / Monitor / Painter / Remkiller / 
SU-File /Tastaturbelegung 



SP-SR-K-2 
SP-SR-D-2 



Kassette 20,- 
Diskette 27,- 



4($J TX-99/4A 



Achtung: Die gesamten TI-Programme 
laufen nur mit Extended Basic 



Superpaket 1 
Spiele 

Stardust / Miner 99 / Fire Fox / Maya I / 
Maya II / Jagdszene Chikago / Moon Race 
/ Slicks / Frogger / Alien Landing 



TPK 1/85 



nur Kassette 20,- 




Superpaket 1 
Spiele 

Andromeda / Wheely / Missile Comand / 
Frogger / Lui der Wurm / Jump / Solitaire / 
Squares / Oil Panic/ Mr. Pacman / Pooyan / 
U- Jäger / Willibald 



SP-S-K-1 



nur Kassette 20,- 




Superpaket 1 
Spiele 

Flowers / Tanker / Jupiter Rescue / Einbre- 
cher / Hospital / Alien / Flipperball / Sub- 
Zone / Dr. Cerp / Geo- Zayxon / Froggies 
Night Mare / Punktefresser / Starwars / Sa- 
lavage Crew 



SP-V-1 



nur Kassette 20,- 




Das war wieder eine Deiner guten Ideen! Seitdem wir die Computronic abonniert haben, 
müssen wir uns nicht immer am Kiosk drängeln. 



Bitt e beachten S ie: Wenn Sie bei Ihrer Bestellung auf Vor- 
kasse zurückgreifen, sparen Sie viel Geld, 
Das gilt besonders Tür unsere ausländischen Computer- 
Freunde; da die Nebenkosten derart hoch sind, schicken wir 
keine Bestellung per Nachnahme ins Ausland. Schicken Sie 
uns deshalb einen Bar- oder Verrechnungsscheck, Postan- 
weisung oder Bargeld. (Die Nebenkosten in der Bundesre- 
publik Deutschland - Nachnahme - betragen 5,- DM) 
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Bestellen Sie unter 



folgender Anschrift: 



TRONIC-VERLAG 

Am Stad 35 
3440 Eschwege 
Tel.: 05651/30011 
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* Vom Chefredakteur empfohlen: Brand(t) aktuelle Software * 




Programm 



Preis/ 
Kassette 



Preis/ 
Diskette 



Bestell-Nr. 



Tron/Mercurious 


15,— 


15,- 


C 


13 


Interceptor Base/ Schotter 


IS- 


15,— 


c 


23 


Jump Man/The Way/ Space Taxi 


IS— 


15,-r 


c 


33 


Fight Night/Monsterjagd/Colossus Mühle 


15, — 


15,— 


c 


43 


Mr. Posiman/Moontunnel/ 
Moonralley/Steinschlag 


15, — 


15,— 


c 


53 


Deadly Mission /Stoneage Comic 


15, — 


15,— 


c 


63 


Taxi Driver/ Space Odyssey 


19,50 


19,50 


c 


14 


Joe/Look Sharp 


19,50 


19,50 


c 


24 


* Turbo Racer/Biene Maja 


19,50 


19.50 


c 


34 




Programm 



Preis/ 
Kassette 



Preis/ 
Diskette 



Bestell-Nr. 



Horror Castle/ Fantasy County 


12- 


- 


23 


Goldrausch/Moon Fighter 


10,— 


10,— 


33 


Frogger/Humor 


10.— 


10,— 


43 


CosmicTerror/Scirwiramen/Break In 


14,— 


14 — 


53 


Pank/Phantom/Meteorstorm 


14,— 


14 — 


63 


Hyper Space/Flower 


18,— 


18,— 


O 14 


Spaeetrader/Save ourTurtles 


IS- 


IB- 


24 


* Memory/Quadrato 


IS,— 


IS— 


34 




Programm 


Preis/ 
Kassette 


Bestell-Nr. 


Brückenbau/ Jango 


14,— 


V 


13 


Miner, der Fassadenstreicher/Inkaschatz 


14 — 


V 


23 


Bergshooting/Booby in Action 


14 — 


V 


33 


Josef in den Katakomben 


14,— 


V 


43 


Hot Food/Men-Rescue/Soundprogramm 


14 — 


V 


53 


Castle Dracula/UFO-Destroyer 


14 — 


V 


63 


Cosmic Bouncer/Cave Rider 


14 — 


V 


14 


Biathlon/ Space Laboratory 


14 — 


V 


24 


* Titan 


14,— 


V 


34 






Programm 



Preis/ 
Kassette 



Preis/ 
Diskette 



Bestell-Nr. 



Schneider Panik/Killer Ship 12,— 18 


SR 13 


Mi dnight/ Horror Caves 12, — 18 


SR 23 


Spider Maze 12, — 18 


SR 33 


Triton/Traumland 12, — 18 


SR 43 


Starpatrol/Helicopter Pilot 12, — 18 


SR 53 


Red Alert/ Speedy-Frogs/ Aurion 12,— 18 


SR 63 


Space Battle 15,— 20 


SR 14 


Pac Man/Procon-Delta/Hospital 15, — 20 


SR 24 


* Kung-Fu Master 15, — 20 


SR 34 




800 XL (*600) 



Programm 



Preis/ Preis/ 

Kassette Diskette 



Bestell- Nr. 



Groove 


14,— 


14,— 


I 13A 


Treter/Cavehunt 


10 — 


10,— 


I 13 B 


Top Tennis/ Panzerschlacht 


14 — 


- 


I 23 


Expedition/ Cavehunt 


- 


15,— 


I 33 


Cavehunt 


10 — 


- 


1 33A 


BoulderDash 


14,— 


14,— 


I 43 


Kitten/ Smurf 


- 


14 — 


I 53 


Smurf 


10 — 


- 


I 53 A 


Grisu/Dragon's Lair 


14 — 


14,— 


I 63 


Ceres/The Whipping Top 


16,50 


16,50 


I 14 


Moon Patrol/Butterflies/Pingu 


16,50 


16,50 


I 24 


*Into Deep/Biene Maja/Quadrato/Reversj 


16,50 


16,50 


I 34 



iincilEM^ 
Spectrum 



Programm 



Preis/ 
Kassette 



Bestell-Nr. 



Karl der Käfer 


10,— 


S 


13 


Otto Schweinsohr/ Ausschnittkopierer 


12,— 


S 


23 


Car Crash/Cosmische Arche 


12,- 


S 


33 


Zone-M 


10,— 


S 


43 


Cherxy Jerry /Air Speeder 


12,— 


S 


53 


Der Spion/3 -Defens 


. -12- 


S 


63 


Goldrunner 


16,50 


S 


14 


Alien Command 


16,50 


S 


24 


* Oswald 


16,50 


S 


34 




Achtung: Die gesaraten TI- Pro- 
gramme laufen nur mit Extended 
Basic 



Programm 



Preis/ 
Kassette 



Bestell- Nr. 



Jäger des verlorenen Schatzes 


10,— 


T 13 


Thai-Boxing 


10 — 


T 23 


Wanderer/Dessert Attack 


12 — 


T 33 


Scootie 


10,— 


T 43 


Pitfall/Odysee 


12,— 


T 53 


Tutanchamon's Tomb 


10,— 


T 63 


Crazy Cowboy 


14,50 


T 14 


Rubberhall/Hugo 


14,50 


T 24 


*Jumping Miner 


14,50 


T 34 




Programm 



Preis/ 
Diskette 



Bestell-Nr. 



Prodata/Music Editor . 


10,— 


A 13 


Pac Boy 


10 — 


A 23 


3 D-lrrgarten 


10,— 


A 33 


Jump Man 


10,— 


A 43 


AstroWar 


" 10,— 


A 53 


Tontaubenschießen 


10,— 


A 63 


Mariner V 


14,50 


A 14 


Front Fighter 


14.50 


A 24 


* Enemy Attack 


14,50 


A 34 
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Das erste und einzi ge 
SOFTWARE-MAGAZIN 

Die aktuelle Ausgabe gibt's jetzt überall 




100 Seiten Programme im Test 
der Software-Markt auf einen Blick 
speziell gesuchte Software kann direkt 
beim Hersteller bestellt werden 
für alle Anwender von Heimcomputern 



Die umfangreiche 

Information 

des 

S °ftware-Marktes 



